xblock needs to want is argument

rakudo · Dec 14, 2015 · e62d9a7 · e62d9a7
1 parent a22c412
commit e62d9a7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
@@ -1085,7 +1085,7 @@ Compilation unit '$file' contained the following violations:
     }
 
     method xblock($/) {
-        make QAST::Op.new( $<EXPR>.ast, $<pblock>.ast, :op('if'), :node($/) );
+        make QAST::Op.new( WANTED($<EXPR>.ast), $<pblock>.ast, :op('if'), :node($/) );
     }
 
     method pblock($/) {