--- a/compiler/PPCSequenceNode.st	Thu Jun 18 22:11:40 2015 +0100
+++ b/compiler/PPCSequenceNode.st	Fri Jun 19 06:53:06 2015 +0100
@@ -24,7 +24,7 @@
     self children do:[:child |  
         | id |
 
-        id := child name ? 'c'.
+        id := child name notNil ifTrue:[ child name ] ifFalse:[ 'c' ].
         (names includes: id) ifTrue:[ 
             | i |