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

     2 

     3 "{ NameSpace: Smalltalk }"

     4 

     5 PPCSequenceNode subclass:#PPCTokenSequenceNode

     6 	instanceVariableNames:''

     7 	classVariableNames:''

     8 	poolDictionaries:''

     9 	category:'PetitCompiler-Nodes'

    10 !

    11 

    12 

    13 !PPCTokenSequenceNode methodsFor:'accessing'!

    14 

    15 suffix

    16 	^ #'_fast'

    17 ! !

    18 

    19 !PPCTokenSequenceNode methodsFor:'visiting'!

    20 

    21 accept: visitor

    22 	^ visitor visitTokenSequenceNode: self

    23 ! !

    24 

    25 !PPCTokenSequenceNode class methodsFor:'documentation'!

    26 

    27 version_HG

    28 

    29     ^ '$Changeset: <not expanded> $'

    30 ! !

    31