compiler/PPCForwardNode.st
changeset 516 3b81c9e53352
parent 515 b5316ef15274
--- a/compiler/PPCForwardNode.st	Fri Jul 31 14:07:31 2015 +0100
+++ b/compiler/PPCForwardNode.st	Mon Aug 17 12:56:02 2015 +0100
@@ -11,7 +11,12 @@
 
 !PPCForwardNode methodsFor:'accessing'!
 
-prefix
+child: node
+    "(node name asString beginsWith: 'symbol') ifTrue: [ self halt. ]."
+    ^ super child: node
+!
+
+defaultName
     ^ #fw
 ! !