Mark generated *%_ as having hash sigil.

This prevents it getting wrapped up in an extra scalar container.
rakudo · Apr 7, 2014 · caa39a8 · caa39a8
1 parent 45863ee
commit caa39a8
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
@@ -3004,7 +3004,8 @@ class Perl6::Actions is HLL::Actions does STDActions {
                     variable_name => '%_',
                     nominal_type => $*W.find_symbol(['Mu']),
                     named_slurpy => 1,
-                    is_multi_invocant => 1
+                    is_multi_invocant => 1,
+                    sigil => '%'
                 ));
                 $past[0].unshift(QAST::Var.new( :name('%_'), :scope('lexical'), :decl('var') ));
                 $past.symbol('%_', :scope('lexical'));