Pass the match result into the transformation for :when passes.

ekiru · Jul 31, 2010 · 97d95b0 · 97d95b0
1 parent 68344b1
commit 97d95b0
Showing 1 changed file with 8 additions and 3 deletions.
diff --git a/src/Tree/Optimizer/Pass.nqp b/src/Tree/Optimizer/Pass.nqp
@@ -29,9 +29,14 @@ method BUILD (:$transformation, :$name, :$when, *%ignored) {
 }
 
 method run ($tree) {
-    if !pir::defined__IPP($!when) || $tree ~~ $!when {
-        $!transformation($tree);
+    if pir::defined__IPP($!when) {
+        my $/ := $tree ~~ $!when;
+        if $/ {
+            $!transformation($/);
+        } else {
+            $tree;
+        }
     } else {
-        $tree;
+        $!transformation($tree);
     }
 }