--- a/compiler/tests/PPCLTokenizingOptimizationTest.st	Fri Jul 24 15:06:54 2015 +0100
+++ b/compiler/tests/PPCLTokenizingOptimizationTest.st	Mon Aug 17 12:13:16 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 parser child whitespace type: PPCTokenStarSeparatorNode.
+    self assert: result whitespace type: PPCTokenStarSeparatorNode.
 !
 
 testCompileTrimmingToken
@@ -53,10 +53,10 @@
     self assert: result type: PPCTokenizingParserNode.
     self assert: result parser type: PPCTokenConsumeNode.
     self assert: result parser child type: PPCTrimmingTokenNode.
-    self assert: result parser child whitespace type: PPCTokenStarSeparatorNode.
+    self assert: result whitespace type: PPCTokenStarSeparatorNode.
     
-    self assert: result tokenizer children size = 2.
-    self assert: (result tokenizer children anySatisfy: [ :e | e isKindOf: PPCTrimmingTokenNode ])
+    self assert: result tokens children size = 1.
+    self assert: (result tokens children anySatisfy: [ :e | e isKindOf: PPCTrimmingTokenNode ])
 !
 
 testCompileTrimmingToken2
@@ -70,11 +70,11 @@
     self assert: result type: PPCTokenizingParserNode.
     self assert: result parser type: PPCTokenConsumeNode.
     self assert: result parser name = 'fooToken'.
-    self assert: result parser child name = 'token_fooToken'.
+    self assert: result parser child name = 'fooToken'.
     
-    self assert: result tokenizer children size = 2.
-    self assert: (result tokenizer children anySatisfy: [ :e | e isKindOf: PPCTrimmingTokenNode ]).
-    self assert: (result tokenizer children anySatisfy: [ :e | e name = 'token_fooToken']).
+    self assert: result tokens children size = 1.
+    self assert: (result tokens children anySatisfy: [ :e | e isKindOf: PPCTrimmingTokenNode ]).
+    self assert: (result tokens children anySatisfy: [ :e | e name = 'fooToken']).
 ! !
 
 !PPCLTokenizingOptimizationTest class methodsFor:'documentation'!