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

IRFunction subclass:#IRMethod
	instanceVariableNames:''
	classVariableNames:''
	poolDictionaries:''
	category:'NewCompiler-IR'
!

IRMethod comment:'I am a method in the IR (intermediate representation) language consisting of IRInstructions grouped by IRSequence (basic block).  The IRSequences form a control graph (therefore I only have to hold onto the starting sequence).  #compiledMethod will convert me to a CompiledMethod.  #methodNode will convert me back to a parse tree.
'
!


!IRMethod methodsFor:'accessing'!

numArgs

        ^ self numRargs - 1

    "Created: / 30-03-2009 / 18:48:30 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !

!IRMethod methodsFor:'accessing - defaults'!

defaultCompiledCodeClass
    ^ Method
! !

!IRMethod methodsFor:'instructions - helpers'!

tempArgKindForLevel:level

    ^#MArg

    "Modified: / 30-03-2009 / 11:58:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
!

tempVarKindForLevel:level

    ^#MVar

    "Modified: / 30-03-2009 / 11:59:00 / Jan Vrany <vranyj1@fel.cvut.cz>"
! !

!IRMethod methodsFor:'testing'!

isIRMethod
    ^ true
! !

!IRMethod class methodsFor:'documentation'!

version
    ^ '$Header: /cvs/stx/cvut/stx/goodies/newcompiler/IRMethod.st,v 1.3 2009/10/08 11:56:48 fm Exp $'
!

version_CVS
    ^ '$Header: /cvs/stx/cvut/stx/goodies/newcompiler/IRMethod.st,v 1.3 2009/10/08 11:56:48 fm Exp $'
!

version_SVN
    ^ '$Id$'
! !