Fix RT #130979

rakudo · Mar 11, 2017 · 27dc7b1 · 27dc7b1
1 parent 1754dc5
commit 27dc7b1
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/src/Perl6/World.nqp b/src/Perl6/World.nqp
@@ -1110,7 +1110,9 @@ class Perl6::World is HLL::World {
     method arglist($/) {
         my $arglist;
         if $<arglist><EXPR> -> $expr {
-            $arglist := self.compile_time_evaluate($/,$expr.ast).List.FLATTENABLE_LIST;
+            if self.compile_time_evaluate($/,$expr.ast) -> $result {
+                $arglist := $result.List.FLATTENABLE_LIST;
+            }
         }
         $arglist;
     }