diff -r 09afcf28ed60 -r 751532c8f3db compiler/PEGFsaGenerator.st
--- a/compiler/PEGFsaGenerator.st	Tue Aug 18 22:46:10 2015 +0100
+++ b/compiler/PEGFsaGenerator.st	Mon Aug 24 15:56:20 2015 +0100
@@ -270,6 +270,18 @@
     ^ self visitPredicateNode: node
 !
 
+visitNilNode: node
+    "not much to do here..."
+    | startState |
+    startState  := PEGFsaState new.
+    
+    ^ PEGFsa new
+        addState: startState;
+        startState: startState;
+        finalState: startState;
+        yourself
+!
+
 visitNode: node
     self error: 'node not supported'
 !
@@ -381,6 +393,10 @@
     ^ self visit: node child
 !
 
+visitTokenWhitespaceNode: node
+    ^ self visit: node child
+!
+
 visitTrimmingTokenCharacterNode: node
     "I do not care about trimming (so far), it should be handled by TokenCodeGenerator"
     ^ self visit: node child
@@ -389,5 +405,23 @@
 visitTrimmingTokenNode: node
     "I do not care about trimming (so far), it should be handled by TokenCodeGenerator"
     ^ self visit: node child
+!
+
+visitUnknownNode: node
+    |  state fsa  |
+    
+    state := PEGFsaParserState new.
+    state name: 'Unknown Parser'.
+    state parser: node parser.
+    
+    fsa := PEGFsa new
+        addState: state;
+        
+        startState: state;
+        finalState: state;
+
+        yourself.
+        
+    ^ fsa
 ! !