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

IRTempAccess subclass:#IRTempRead
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'NewCompiler-IR'
!


!IRTempRead methodsFor:'interpret'!

executeOn: interpreter
        interpreter pushTemp: number kind: kind level: level

    "Modified: / 30-03-2009 / 14:02:08 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !

!IRTempRead methodsFor:'testing'!

isRead
	^true
!

isStore
	^false
! !

!IRTempRead class methodsFor:'documentation'!

version
    ^'$Id$'
! !