Index: src/parser/Actions.pm =================================================================== --- src/parser/Actions.pm (revision 31242) +++ src/parser/Actions.pm (working copy) @@ -425,9 +425,9 @@ my $past := $( $[$count] ); while $count != 0 { $count := $count - 1; - my $past := PAST::Op.new( $($[$count]), + $past := PAST::Op.new( $($[$count]), $past, - :pasttype('if') ); + :pasttype('unless') ); } make $past; } @@ -437,9 +437,9 @@ my $past := $( $[$count] ); while $count != 0 { $count := $count - 1; - my $past := PAST::Op.new( $($[$count]), + $past := PAST::Op.new( $($[$count]), $past, - :pasttype('unless') ); + :pasttype('if') ); } make $past; }