Mark dyncomp boundaries.

rakudo · May 27, 2013 · a31ce41 · a31ce41
1 parent f4fe4dd
commit a31ce41
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Perl6/World.nqp b/src/Perl6/World.nqp
@@ -1220,6 +1220,7 @@ class Perl6::World is HLL::World {
         # Create outer lexical contexts with all symbols visible. Maybe 
         # we can be a bit smarter here some day. But for now we just make a
         # single frame and copy all the visible things into it.
+        $past<DYN_COMP_WRAPPER> := 1;
         my %seen;
         my $mu        := try { self.find_symbol(['Mu']) };
         my $cur_block := $past;