Fix dumping block with null_s cuids

Raku · Jan 20, 2018 · a45bfea · a45bfea
1 parent 734b9e5
commit a45bfea
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/QAST/Block.nqp b/src/QAST/Block.nqp
@@ -93,7 +93,9 @@ class QAST::Block is QAST::Node does QAST::Children {
     }
 
     method dump_extra_node_info() {
-        ":cuid($!cuid)"
-          ~ (nqp::chars(self.blocktype) ?? " :blocktype($!blocktype)" !! "");
+        my @extra;
+        @extra.push(":cuid($!cuid)") unless nqp::isnull_s($!cuid);
+        @extra.push(":blocktype($!blocktype)") unless nqp::chars(self.blocktype);
+        nqp::join(' ', @extra);
     }
 }