Don't trip up over strings in QAST nodes.

It's locallifetime that led to the observable explosion, but handle has been around and this code was vulnerable to that also. Fixes the macro test regressions in Rakudo.
Raku · Jun 30, 2013 · 9fca92f · 9fca92f
1 parent bfe5a06
commit 9fca92f
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/QAST/Op.nqp b/src/QAST/Op.nqp
@@ -21,7 +21,8 @@ class QAST::Op is QAST::Node {
         my $i := 0;
         my $elems := +@(self);
         while $i < $elems {
-            $result[$i] := self[$i].substitute_inline_placeholders(@fillers);
+            $result[$i] := self[$i].substitute_inline_placeholders(@fillers)
+                unless nqp::isstr(self[$i]);
             $i := $i + 1;
         }
         $result
@@ -32,7 +33,8 @@ class QAST::Op is QAST::Node {
         my $i := 0;
         my $elems := +@(self);
         while $i < $elems {
-            $result[$i] := self[$i].evaluate_unquotes(@unquotes);
+            $result[$i] := self[$i].evaluate_unquotes(@unquotes)
+                unless nqp::isstr(self[$i]);
             $i := $i + 1;
         }
         $result