diff --git a/src/Perl6/Actions.pm b/src/Perl6/Actions.pm
index 3dff13b31cc..4b05baf24bd 100644
--- a/src/Perl6/Actions.pm
+++ b/src/Perl6/Actions.pm
@@ -646,6 +646,9 @@ class Perl6::Actions is HLL::Actions does STDActions {
                             QAST::Op.new(:op('call'), :name('&infix:<,>'), $cond),
                             block_closure($past)
                         );
+                    $past := QAST::Op.new(
+                        :op<callmethod>, :name<eager>, $past
+                    );
                 }
                 else {
                     $past := QAST::Op.new($cond, $past, :op(~$ml<sym>), :node($/) );
@@ -860,6 +863,9 @@ class Perl6::Actions is HLL::Actions does STDActions {
                         QAST::Op.new(:name('&infix:<,>'), :op('call'), $xblock[0]),
                         block_closure($xblock[1])
         );
+        $past := QAST::Op.new(
+            :op<callmethod>, :name<eager>, $past
+        );
         make $past;
     }