Fix declaring multiple lexical classes in a given scope.

rakudo · May 1, 2010 · db73c1f · db73c1f
1 parent 376196d
commit db73c1f
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Perl6/Compiler/Package.pm b/src/Perl6/Compiler/Package.pm
@@ -214,6 +214,7 @@ method finish($block) {
     }
     elsif $!scope eq 'my' {
         # Install a binding of the declaration to a name in the lexpad.
+        $decl := PAST::Block.new( :blocktype('immediate'), $decl );
         @Perl6::Actions::BLOCK[0][0].push(PAST::Var.new(
             :name($!name), :isdecl(1),  :viviself($decl), :scope('lexical')
         ));