Do not try to inline PPCPluggableNode on Smalltalk/X
Sadly, on Smalltalk/X blocks cannot be inlined because
the VM does not provide enough information to map it back
to the source code. Very bad indeed!
"{ 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
! !