compiler/PPCProfilingContext.st
changeset 515 b5316ef15274
parent 502 1e45d3c96ec5
equal deleted inserted replaced
502:1e45d3c96ec5 515:b5316ef15274
     8 	classVariableNames:''
     8 	classVariableNames:''
     9 	poolDictionaries:''
     9 	poolDictionaries:''
    10 	category:'PetitCompiler-Context'
    10 	category:'PetitCompiler-Context'
    11 !
    11 !
    12 
    12 
       
    13 
       
    14 !PPCProfilingContext methodsFor:'accessing'!
       
    15 
       
    16 position: value
       
    17     self assert: value isInteger.
       
    18     super position: value
       
    19 ! !
    13 
    20 
    14 !PPCProfilingContext methodsFor:'gt'!
    21 !PPCProfilingContext methodsFor:'gt'!
    15 
    22 
    16 gtReport: composite
    23 gtReport: composite
    17     <gtInspectorPresentationOrder: 40>
    24     <gtInspectorPresentationOrder: 40>