Unbust POST.

rakudo · Sep 23, 2015 · e741fcd · e741fcd
1 parent 1acccc2
commit e741fcd
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/Perl6/World.nqp b/src/Perl6/World.nqp
@@ -2776,7 +2776,9 @@ class Perl6::World is HLL::World {
                         }
                     }
                 }
-                $phaser_past[0].unshift(QAST::Var.new( :name('$_'), :scope('lexical'), :decl('var') ));
+                else {
+                    $phaser_past[0].unshift(QAST::Var.new( :name('$_'), :scope('lexical'), :decl('var') ));
+                }
                 nqp::push(
                     nqp::getattr($block.signature, self.find_symbol(['Signature']), '$!params'),
                     self.create_parameter($/, hash(