IRInstVarAccess.st
changeset 9 04518c7fb91c
parent 1 0dd36941955f
child 23 377bc46cad12
equal deleted inserted replaced
8:203df4f28793 9:04518c7fb91c
    17 isInstVarAccess
    17 isInstVarAccess
    18 	^true.
    18 	^true.
    19 !
    19 !
    20 
    20 
    21 varname
    21 varname
    22 	name ifNil: [name := self method compiledMethod methodClass allInstVarNames at: self offset].
    22     name 
    23 	^name.
    23         ifNil:[
       
    24             name := self method compiledCode methodClass allInstVarNames 
       
    25                         at:self offset
       
    26         ].
       
    27     ^ name.
    24 ! !
    28 ! !
    25 
    29 
    26 !IRInstVarAccess class methodsFor:'documentation'!
    30 !IRInstVarAccess class methodsFor:'documentation'!
    27 
    31 
    28 version
    32 version