--- a/compiler/tests/PPCRecognizerComponentVisitorTest.st	Tue May 12 01:24:03 2015 +0100
+++ b/compiler/tests/PPCRecognizerComponentVisitorTest.st	Thu May 21 14:12:22 2015 +0100
@@ -182,6 +182,7 @@
     | starNode |
     starNode := PPCStarMessagePredicateNode new
         message: #isLetter;
+        child: PPCSentinelNode instance;
         yourself.
     
     node := PPCTokenNode new
@@ -197,6 +198,7 @@
     | starNode |
     starNode := PPCStarMessagePredicateNode new
         message: #isSeparator;
+        child: PPCSentinelNode instance;
         yourself.
     
     node := PPCTokenNode new