Fix hash composer ({ a => 1, b => 2 }).

rakudo · Jun 19, 2011 · 12d25b6 · 12d25b6
1 parent ba41493
commit 12d25b6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm
@@ -2071,7 +2071,7 @@ class Perl6::Actions is HLL::Actions {
             }
         }
         if $is_hash { # XXX && $past.arity < 1 {
-            my @children := @($past[1]);
+            my @children := @($past<past_block>[1]);
             $past := PAST::Op.new(
                 :pasttype('call'),
                 :name('&circumfix:<{ }>'),