1 "{ Package: 'stx:goodies/petitparser/compiler' }"

     1 "{ Package: 'stx:goodies/petitparser/compiler' }"

     2 

     4 

     3 PPCAbstractPredicateNode subclass:#PPCNotMessagePredicateNode

     5 PPCAbstractPredicateNode subclass:#PPCNotMessagePredicateNode

     4 	instanceVariableNames:'message'

     6 	instanceVariableNames:'message'

     5 	classVariableNames:''

     7 	classVariableNames:''

     6 	poolDictionaries:''

     8 	poolDictionaries:''

    13 	^ PPCInlineNotMessagePredicateNode new

    15 	^ PPCInlineNotMessagePredicateNode new

    14 		predicate: predicate;

    16 		predicate: predicate;

    15 		message: message;

    17 		message: message;

    16 		name: name;

    18 		name: name;

    17 		yourself

    19 		yourself

    22 !

    20 !

    23 

    21 

    24 firstCharSet

    22 firstCharSet

    25 	PPCharSetPredicate on: [:e | (predicate value:e)  not ] 

    23 	PPCharSetPredicate on: [:e | (predicate value:e)  not ] 

    26 !

    24 !