Unbreak build on JVM

Apparently, you cannot nqp::bool a null on JVM
rakudo · Mar 7, 2015 · b497d41 · b497d41
1 parent 1b74e4e
commit b497d41
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
@@ -2567,9 +2567,12 @@ class Perl6::Actions is HLL::Actions does STDActions {
             if $*SOFT {
                 $*W.find_symbol(['&infix:<does>'])($code, $*W.find_symbol(['SoftRoutine']));
             }
-            elsif !nqp::can($code, 'postcircumfix:<( )>')
-               && !nqp::p6bool(nqp::getattr($code, $*W.find_symbol(['Block']), '$!phasers')) {
-                self.add_inlining_info_if_possible($/, $code, $signature, $block, @params);
+            elsif !nqp::can($code, 'postcircumfix:<( )>') {
+                my $phasers :=
+                  nqp::getattr($code,$*W.find_symbol(['Block']),'$!phasers');
+                if nqp::isnull($phasers) || !nqp::p6bool($phasers) {
+                    self.add_inlining_info_if_possible($/, $code, $signature, $block, @params);
+                }
             }
         }