compiler/PPCCompiledMethod.st
changeset 391 553a5456963b
child 392 9b297f0d949c
equal deleted inserted replaced
390:17ba167b8ee1 391:553a5456963b
       
     1 "{ Package: 'stx:goodies/petitparser/compiler' }"
       
     2 
       
     3 Object subclass:#PPCCompiledMethod
       
     4 	instanceVariableNames:'code id'
       
     5 	classVariableNames:''
       
     6 	poolDictionaries:''
       
     7 	category:'PetitCompiler-Core'
       
     8 !
       
     9 
       
    10 PPCCompiledMethod comment:''
       
    11 !
       
    12 
       
    13 !PPCCompiledMethod methodsFor:'as yet unclassified'!
       
    14 
       
    15 call
       
    16 	^ 'self ', self methodName, '.'.
       
    17 !
       
    18 
       
    19 id: value
       
    20 	id := value
       
    21 !
       
    22 
       
    23 methodName
       
    24 	^ id
       
    25 ! !
       
    26