Fix compiling our-scoped subs.

Not sure why we ever got away without this on Parrot.
Raku · Apr 25, 2013 · e8b076b · e8b076b
1 parent 1c43791
commit e8b076b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/NQP/Actions.nqp b/src/NQP/Actions.nqp
@@ -902,6 +902,10 @@ class NQP::Actions is HLL::Actions {
                             lexical_package_lookup([$name], $/),
                             QAST::Var.new( :name('&' ~ $name), :scope('lexical') )
                         ));
+
+                        # Also need to make sure it gets a code object so it's
+                        # in the SC.
+                        $*W.create_code($past, $name, 0);
                     }
                 }
                 $past := QAST::Var.new( :name('&' ~ $name), :scope('lexical') );