--- a/compiler/PPCInlineTokenStarMessagePredicateNode.st	Fri May 01 13:44:43 2015 +0200
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,28 +0,0 @@
-"{ Package: 'stx:goodies/petitparser/compiler' }"
-
-"{ NameSpace: Smalltalk }"
-
-PPCTokenStarMessagePredicateNode subclass:#PPCInlineTokenStarMessagePredicateNode
-	instanceVariableNames:''
-	classVariableNames:''
-	poolDictionaries:''
-	category:'PetitCompiler-Nodes'
-!
-
-!PPCInlineTokenStarMessagePredicateNode methodsFor:'as yet unclassified'!
-
-asInlined
-	^ self
-!
-
-compileWith: compiler effect: effect id: id
-	compiler startInline: id.
-	compiler add: '[ context peek ', message,' ] whileTrue: ['.
-	compiler indent.
-	compiler add: 'context next'.
-	compiler indent.
-	compiler dedent.
-	compiler add: '].'.
- ^ compiler stopInline.
-! !
-