--- a/compiler/extensions.st	Wed Nov 05 21:40:01 2014 +0000
+++ b/compiler/extensions.st	Wed Nov 05 23:05:19 2014 +0000
@@ -552,6 +552,18 @@
 	^ self
 ! !
 
+!PPPredicateObjectParser methodsFor:'*petitcompiler'!
+
+firstCharSet
+	^ predicate
+! !
+
+!PPPredicateObjectParser methodsFor:'*petitcompiler'!
+
+firstCharSetCached
+	^ predicate
+! !
+
 !PPSequenceParser methodsFor:'*petitcompiler'!
 
 asCompilerNode
@@ -692,6 +704,12 @@
 	^ PPFailingParser new
 ! !
 
+!PPSmalltalkWhitespaceParser methodsFor:'*petitcompiler'!
+
+firstCharSet
+	^ PPCharSetPredicate on: [:e | false ] 
+! !
+
 !PPStream methodsFor:'*petitcompiler'!
 
 peek: anInteger
@@ -850,6 +868,12 @@
 	^ false
 ! !
 
+!UndefinedObject methodsFor:'*petitcompiler'!
+
+isSeparator
+	^ false
+! !
+
 !stx_goodies_petitparser_compiler class methodsFor:'documentation'!
 
 extensionsVersion_HG