--- a/compiler/PPCRecognizingSequenceNode.st	Fri Jul 24 15:06:54 2015 +0100
+++ b/compiler/PPCRecognizingSequenceNode.st	Mon Aug 17 12:13:16 2015 +0100
@@ -12,7 +12,7 @@
 !PPCRecognizingSequenceNode methodsFor:'accessing'!
 
 suffix
-    ^ super suffix, '_fast'
+    ^ super suffix isNil ifTrue: [ 'fast' ] ifFalse: [ super suffix, '_fast' ]
 ! !
 
 !PPCRecognizingSequenceNode methodsFor:'visiting'!