Resolve divergence in QAST nodes.

jnthn · Apr 13, 2013 · ad1a19f · ad1a19f
1 parent ada971f
commit ad1a19f
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/nqp-src/QASTNodes.nqp b/nqp-src/QASTNodes.nqp
@@ -326,7 +326,9 @@ class QAST::Var is QAST::Node {
     }
 
     method dump_extra_node_info() {
-        "$!scope $!name";
+        $!decl
+            ?? "$!scope $!name :decl"
+            !! "$!scope $!name";
     }
 }
 # From src\QAST\VarWithFallback.nqp
@@ -432,6 +434,10 @@ class QAST::Stmts is QAST::Node {
         }
         $result
     }
+
+    method dump_extra_node_info() {
+        nqp::defined($!resultchild) ?? ":resultchild($!resultchild))" !! ''
+    }
 }
 # From src\QAST\Stmt.nqp
 
@@ -461,6 +467,10 @@ class QAST::Stmt is QAST::Node {
         }
         $result
     }
+
+    method dump_extra_node_info() {
+        nqp::defined($!resultchild) ?? ":resultchild($!resultchild))" !! ''
+    }
 }
 # From src\QAST\Block.nqp