"{ Package: 'cvut:stx/goodies/newcompiler' }"
IRLiteralVariableAccess subclass:#IRLiteralVariableRead
instanceVariableNames:''
classVariableNames:''
poolDictionaries:''
category:'NewCompiler-IR'
!
!IRLiteralVariableRead methodsFor:'interpret'!
executeOn: interpreter
interpreter pushLiteralVariable: association
! !
!IRLiteralVariableRead methodsFor:'testing'!
isRead
^true
!
isStore
^false
! !
!IRLiteralVariableRead class methodsFor:'documentation'!
version
^ '$Header: /cvs/stx/cvut/stx/goodies/newcompiler/IRLiteralVariableRead.st,v 1.3 2009/10/08 12:03:40 fm Exp $'
!
version_CVS
^ '$Header: /cvs/stx/cvut/stx/goodies/newcompiler/IRLiteralVariableRead.st,v 1.3 2009/10/08 12:03:40 fm Exp $'
!
version_SVN
^ '$Id$'
! !