Fix #130998

FCO · Mar 15, 2017 · e1ebb50 · e1ebb50
1 parent d232f3c
commit e1ebb50
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/Perl6/Grammar.nqp b/src/Perl6/Grammar.nqp
@@ -4089,6 +4089,7 @@ grammar Perl6::Grammar is HLL::Grammar does STD {
         || { self.typed_panic: "X::Syntax::CannotMeta", meta => "reduce with", operator => ~$op<OPER><sym>, dba => ~$op<OPER><O>.made<dba>, reason => 'diffy and not chaining' }
         ]
 
+        { $*IN_REDUCE := 0 }
         <args>
     }