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

     2 

     3 PPCAbstractCharacterNode subclass:#PPCInlineCharacterNode

     4 	instanceVariableNames:''

     5 	classVariableNames:''

     6 	poolDictionaries:''

     7 	category:'PetitCompiler-Nodes'

     8 !

     9 

    10 PPCInlineCharacterNode comment:''

    11 !

    12 

    13 !PPCInlineCharacterNode methodsFor:'as yet unclassified'!

    14 

    15 printOn: aStream

    16 	aStream nextPutAll: #inlined.

    17 	super printOn: aStream.

    18 !

    19 

    20 start: compiler id: id

    21 	compiler startInline: id.

    22 !

    23 

    24 stop: compiler

    25 	^ compiler stopInline

    26 ! !

    27