From ba09db6719dd5b6ee05f71bc35a27eeea27d0373 Mon Sep 17 00:00:00 2001
From: Jeremy Studer <studerj1.mail@gmail.com>
Date: Wed, 7 Feb 2018 10:04:13 -0500
Subject: [PATCH] Remove extra push of child to outer block

The action should only occur once and already occurs in the method to
create code objects. zoffix++ for verification.
---
 src/Perl6/Actions.nqp | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
index 64b4122c0e3..34ed0eeaf3e 100644
--- a/src/Perl6/Actions.nqp
+++ b/src/Perl6/Actions.nqp
@@ -8333,7 +8333,6 @@ class Perl6::Actions is HLL::Actions does STDActions {
         }
         my $rep_block := $*SUBST_RHS_BLOCK;
         $rep_block.push(QAST::Stmts.new($right, :node($<sibble><right>)));
-        $*W.cur_lexpad()[0].push($rep_block);
         my $closure := block_closure(reference_to_code_object(
             $*W.create_code_obj_and_add_child($rep_block, 'Code'),
             $rep_block));