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

Object subclass:#PPCInlineStrategy
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Nodes'
!

PPCInlineStrategy class instanceVariableNames:'Instance'

"
 No other class instance variables are inherited by this class.
"
!

!PPCInlineStrategy class methodsFor:'as yet unclassified'!

instance
	^ Instance ifNil: [ 
		Instance := self basicNew initialize.
	]
!

new
	^ self instance
! !

!PPCInlineStrategy methodsFor:'as yet unclassified'!

return: compiler
	compiler add: ''.
!

start: compiler id: id
	^ compiler startInline: id
!

stop: compiler
 ^ compiler stopInline
! !