compiler/PPCAbstractCharacterNode.st
changeset 422 116d2b2af905
parent 421 7e08b31e0dae
child 429 23de165842c3
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 PPCNode subclass:#PPCAbstractCharacterNode
     5 PPCNode subclass:#PPCAbstractCharacterNode
     4 	instanceVariableNames:'character'
     6 	instanceVariableNames:'character'
     5 	classVariableNames:''
     7 	classVariableNames:''
     6 	poolDictionaries:''
     8 	poolDictionaries:''
    25 prefix
    27 prefix
    26 	^ #char
    28 	^ #char
    27 ! !
    29 ! !
    28 
    30 
    29 !PPCAbstractCharacterNode methodsFor:'analysis'!
    31 !PPCAbstractCharacterNode methodsFor:'analysis'!
    30 
       
    31 firstCharParser
       
    32 	^ character asParser
       
    33 !
       
    34 
    32 
    35 firstCharSet
    33 firstCharSet
    36 	^ PPCharSetPredicate on: [:e | e = character ]
    34 	^ PPCharSetPredicate on: [:e | e = character ]
    37 ! !
    35 ! !
    38 
    36