Skip to content

Commit 3ea0dd4

Browse files
committed
Toss dead code.
1 parent 6a87efb commit 3ea0dd4

File tree

1 file changed

+0
-16
lines changed

1 file changed

+0
-16
lines changed

src/HLL/World.nqp

Lines changed: 0 additions & 16 deletions
Original file line numberDiff line numberDiff line change
@@ -43,16 +43,10 @@ class HLL::World {
4343
# or between compile time and run time.
4444
has @!fixup_tasks;
4545

46-
# Address => slot mapping, so we can quickly look up existing objects
47-
# in the context.
48-
# XXX LEGACY
49-
has %!addr_to_slot;
50-
5146
method BUILD(:$handle!, :$description = '<unknown>') {
5247
# Initialize attributes.
5348
$!sc := nqp::createsc($handle);
5449
$!handle := $handle;
55-
%!addr_to_slot := nqp::hash();
5650
@!fixup_tasks := nqp::list();
5751
@!load_dependency_tasks := nqp::list();
5852
$!precomp_mode := %*COMPILING<%?OPTIONS><precomp>;
@@ -63,22 +57,12 @@ class HLL::World {
6357
# Add to currently compiling SC stack.
6458
nqp::pushcompsc($!sc);
6559
}
66-
67-
# Gets the slot for a given object. Dies if it is not in the context.
68-
method slot_for_object($obj) {
69-
my $slot := %!addr_to_slot{nqp::where($obj)};
70-
unless nqp::defined($slot) {
71-
nqp::die('slot_for_object called on object not in context');
72-
}
73-
$slot
74-
}
7560

7661
# Adds an object to the root set, along with a mapping.
7762
method add_object($obj) {
7863
nqp::setobjsc($obj, $!sc);
7964
my $idx := nqp::scobjcount($!sc);
8065
nqp::scsetobj($!sc, $idx, $obj);
81-
%!addr_to_slot{nqp::where($obj)} := $idx;
8266
$idx
8367
}
8468

0 commit comments

Comments
 (0)