extensions.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 02 Dec 2008 09:43:42 +0000
changeset 7 0de2eaa86456
parent 3 c9845c180bd4
child 21 a5d30403049c
permissions -rw-r--r--
IRBytecodeGenerator emits lineno instructions only when lineno differs from the last one

"{ Package: 'stx:goodies/newcompiler' }"

!

!ByteCodeCompiler methodsFor:'accessing'!

literalArray: anArray
    "return the literal array - only valid after parsing"

    litArray := anArray

    "Created: / 03-11-2008 / 14:09:33 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !
!Class methodsFor:'accessing'!

binding

    ^self fullName asSymbol

    "Created: / 11-06-2008 / 11:20:35 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !
!Class methodsFor:'accessing'!

bindingOf: classVarName

    ^(self fullName , ':' , classVarName) asSymbol

    "Created: / 11-06-2008 / 11:29:19 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !