compiler/PPCNotLiteralNode.st
changeset 422 116d2b2af905
parent 421 7e08b31e0dae
child 438 20598d7ce9fa
equal deleted inserted replaced
421:7e08b31e0dae 422:116d2b2af905
     1 "{ Package: 'stx:goodies/petitparser/compiler' }"
     1 "{ Package: 'stx:goodies/petitparser/compiler' }"
       
     2 
       
     3 "{ NameSpace: Smalltalk }"
     2 
     4 
     3 PPCAbstractLiteralNode subclass:#PPCNotLiteralNode
     5 PPCAbstractLiteralNode subclass:#PPCNotLiteralNode
     4 	instanceVariableNames:''
     6 	instanceVariableNames:''
     5 	classVariableNames:''
     7 	classVariableNames:''
     6 	poolDictionaries:''
     8 	poolDictionaries:''
    12 asInlined
    14 asInlined
    13 	^ PPCInlineNotLiteralNode new
    15 	^ PPCInlineNotLiteralNode new
    14 		name: name;
    16 		name: name;
    15 		literal: literal;
    17 		literal: literal;
    16 		yourself
    18 		yourself
    17 !
       
    18 
       
    19 firstCharParser
       
    20 	^ literal first asParser
       
    21 !
    19 !
    22 
    20 
    23 firstCharSet
    21 firstCharSet
    24 	^ PPCharSetPredicate on: [:e | true ]
    22 	^ PPCharSetPredicate on: [:e | true ]
    25 !
    23 !