IRLiteralVariableAccess.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Mon, 17 Sep 2012 09:03:06 +0000
changeset 39 d361eb9419e6
parent 37 be8c2dd09dff
child 41 f3898a3b378d
permissions -rw-r--r--
- IRTempStore changed: #version_SVN - IRAccess changed: #version_SVN - IRMethod changed: #version_SVN - IRPrinter changed: #version_SVN - IRTempRead changed: #version_SVN - IRLiteralVariableRead changed: #version_SVN - IRLine changed: #version_SVN - IRClosure changed: #version_SVN - IRFunction changed: #version_SVN - IRDup changed: #version_SVN - IRTranslator changed: #version_SVN - IRInterpreter changed: #version_SVN - IRBuilder changed: #version_SVN - IRBytecodeGenerator changed: #version_SVN - IRJumpOverBlock changed: #version_SVN - IRBlockReturnTop changed: #version_SVN - IRSequence changed: #version_SVN - IRDecompiler changed: #version_SVN - IRInstVarStore changed: #version_SVN - cvut_stx_goodies_newcompiler added: #excludedFromPreRequisites #extensionsVersion_SVN #svnRepositoryUrlString changed: #preRequisites #svnRevisionNr #version_SVN - IRLiteralVariableAccess changed: #version_SVN - IRTransformTest changed: #version_SVN - IRStackCount changed: #version_SVN - IRInstVarAccess changed: #version_SVN - IRLiteralVariableStore changed: #version_SVN - IRBuilderTest changed: #version_SVN - IRInstruction changed: #version_SVN - IRTempAccess changed: #version_SVN - IRConstant changed: #version_SVN - IRSend changed: #version_SVN - IRInstVarRead changed: #version_SVN - IRPop changed: #version_SVN - IRReturn changed: #version_SVN - IRJump changed: #version_SVN - IRJumpIf changed: #version_SVN - extensions ...

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

IRAccess subclass:#IRLiteralVariableAccess
	instanceVariableNames:'association'
	classVariableNames:''
	poolDictionaries:''
	category:'NewCompiler-IR'
!


!IRLiteralVariableAccess methodsFor:'accessing'!

association: anAssociation
	association := anAssociation
!

isLiteralVariable
	^true
!

isLiteralVariableAccess
	^true
!

isLiteralVariableRead
	^self isLiteralVariableAccess and: [self isRead].
!

isLiteralVariableStore
	^self isLiteralVariableAccess and: [self isStore].
! !

!IRLiteralVariableAccess class methodsFor:'documentation'!

version
    ^ '$Id$'
!

version_CVS
    ^ '§Header: /cvs/stx/cvut/stx/goodies/newcompiler/IRLiteralVariableAccess.st,v 1.3 2009/10/08 11:59:04 fm Exp §'
!

version_SVN
    ^ '$Id::                                                                                                                        $'
! !