--- a/compiler/PPCNode.st	Fri Jun 19 08:13:39 2015 +0100
+++ b/compiler/PPCNode.st	Fri Jul 24 15:37:23 2015 +0100
@@ -242,7 +242,7 @@
         finite := self.
         infinite := anotherNode.
     ] ifFalse: [ 
- 				finite := anotherNode.
+ 								finite := anotherNode.
         infinite := self.	
     ].
         
@@ -525,6 +525,10 @@
 
 !PPCNode methodsFor:'testing'!
 
+canHavePPCId
+    ^ true
+!
+
 isMarkedForInline
     ^ self propertyAt: #inlined ifAbsent: [ false ].
 
@@ -551,6 +555,12 @@
     ^ self
 !
 
+asFsa
+    | visitor |
+    visitor := PEGFsaGenerator new.
+    ^ visitor visit: self
+!
+
 replace: node with: anotherNode
 !