diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm index 1af89324000..bad00516ed2 100644 --- a/src/Perl6/Actions.pm +++ b/src/Perl6/Actions.pm @@ -769,7 +769,7 @@ sub declare_variable($/, $past, $sigil, $twigil, $desigilname, $trait_list) { my $vivipast := PAST::Op.new( $cont, 'rw', $true, :pirop('setprop')); # If it's a scalar, mark it as scalar (non-flattening) - if $sigil eq '$' { + if $sigil eq '$' || $sigil eq '&' { $vivipast := PAST::Op.new($vivipast,'scalar',$true,:pirop('setprop')); }