Mark the CArray dimension as nut sunk

rakudo · Apr 9, 2018 · ae18b7a · ae18b7a
1 parent 36c92d5
commit ae18b7a
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
@@ -3201,8 +3201,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
             if $<scoped><DECL><declarator><variable_declarator><semilist> -> $semilist {
                 my @dimensions := nqp::list_i();
                 for $semilist -> $dimension {
-                    $dimension.ast.nosink(1);
-                    my $elems := nqp::unbox_i($*W.compile_time_evaluate($/, $dimension.ast));
+                    my $elems := nqp::unbox_i($*W.compile_time_evaluate($/, $dimension.ast, :mark-wanted));
                     nqp::push_i(@dimensions, $elems);
                 }
                 nqp::bindattr($attr, $attr.WHAT, '$!dimensions', @dimensions);