compiler/PPCAnyNode.st
changeset 422 116d2b2af905
parent 414 0eaf09920532
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 PPCNode subclass:#PPCAnyNode
     5 PPCNode subclass:#PPCAnyNode
     4 	instanceVariableNames:''
     6 	instanceVariableNames:''
     5 	classVariableNames:''
     7 	classVariableNames:''
     6 	poolDictionaries:''
     8 	poolDictionaries:''
    24 	compiler startMethod: id.
    26 	compiler startMethod: id.
    25 	compiler add: '^ context next ifNil: [ error := true. ].'.
    27 	compiler add: '^ context next ifNil: [ error := true. ].'.
    26  ^ compiler stopMethod.	
    28  ^ compiler stopMethod.	
    27 !
    29 !
    28 
    30 
    29 firstCharParser
       
    30 	^ #any asParser
       
    31 	
       
    32 !
       
    33 
       
    34 firstCharSet
    31 firstCharSet
    35 	^ PPCharSetPredicate on: [:e | true ] 
    32 	^ PPCharSetPredicate on: [:e | true ] 
    36 !
    33 !
    37 
    34 
    38 prefix
    35 prefix