--- a/compiler/PPCNode.st	Tue May 12 01:24:03 2015 +0100
+++ b/compiler/PPCNode.st	Thu May 21 14:12:22 2015 +0100
@@ -77,7 +77,7 @@
 !
 
 suffix
-    ^ ''
+    ^ self isMarkedForInline ifTrue: [ '_inlined' ] ifFalse: [ '' ]
 !
 
 unmarkForGuard
@@ -267,6 +267,7 @@
     (anotherNode class = self class) ifFalse: [ ^ false ].
     
     (anotherNode name = name) ifFalse: [ ^ false ].
+    (anotherNode isMarkedForInline  = self isMarkedForInline) ifFalse: [ ^ false ].
     ^ anotherNode children = self children.
 !
 
@@ -274,7 +275,7 @@
     "TODO JK: IMO not a good hashing function bacause of children size, 
         but at least it is not recursive, which would be worse :)
     "
-    ^ self class hash bitXor: (name hash bitXor: self children size hash)
+    ^ self class hash bitXor: (name hash bitXor: (self isMarkedForInline hash bitXor: (self children size hash)))
 ! !
 
 !PPCNode methodsFor:'copying'!