Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
fewer QAST nodes when eliminating blocks in *-curry
  • Loading branch information
timo committed Feb 28, 2015
1 parent 35de750 commit d2604ea
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions src/Perl6/Actions.nqp
Expand Up @@ -7134,6 +7134,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
if $was_chain && $old.has_ann("chain_args") {
$new := QAST::Op.new( :op<chain>, :name($old.ann('chain_name')), :node($/) );
$old.ann('chain_block')[1] := QAST::Op.new( :op<die>, QAST::SVal.new( :value('This WhateverCode has been inlined into another WhateverCode and should not have been called!') ) );
$old.ann('chain_block')[0] := QAST::Stmts.new( );
for $old.ann('chain_past') {
$new.push($_);
}
Expand Down

0 comments on commit d2604ea

Please sign in to comment.