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

"{ NameSpace: Smalltalk }"

Object subclass:#PPCCompiledMethod
	instanceVariableNames:'id'
	classVariableNames:''
	poolDictionaries:''
	category:'PetitCompiler-Core'
!


!PPCCompiledMethod methodsFor:'as yet unclassified'!

call
    ^ 'self ', self methodName, '.'.
!

id: value
    id := value
!

methodName
    ^ id
! !

!PPCCompiledMethod class methodsFor:'documentation'!

version_MC
    ^ 'PetitCompiler-JanVrany.stx.85 147209f0-e9c3-11e4-944c-606720e43e2c 2015-04-23T15:14:39+01 JanVrany'
! !