--- a/compiler/tests/PPCLTokenizingOptimizationTest.st	Mon Aug 17 12:13:16 2015 +0100
+++ b/compiler/tests/PPCLTokenizingOptimizationTest.st	Mon Aug 24 15:34:14 2015 +0100
@@ -43,7 +43,7 @@
     self assert: result type: PPCTokenizingParserNode.
     self assert: result parser type: PPCTokenConsumeNode.
     self assert: result parser child type: PPCTrimmingTokenNode.
-    self assert: result whitespace type: PPCTokenStarSeparatorNode.
+    self assert: result whitespace type: PPCStarNode.
 !
 
 testCompileTrimmingToken
@@ -53,7 +53,7 @@
     self assert: result type: PPCTokenizingParserNode.
     self assert: result parser type: PPCTokenConsumeNode.
     self assert: result parser child type: PPCTrimmingTokenNode.
-    self assert: result whitespace type: PPCTokenStarSeparatorNode.
+    self assert: result whitespace type: PPCStarNode.
     
     self assert: result tokens children size = 1.
     self assert: (result tokens children anySatisfy: [ :e | e isKindOf: PPCTrimmingTokenNode ])