IRTranslator.st
changeset 31 d9d041406022
parent 26 db19d89eef60
child 37 be8c2dd09dff
equal deleted inserted replaced
30:1b7ff9c8c40b 31:d9d041406022
   165         kind == #MArg ifTrue:[^gen pushMethodArg: index].
   165         kind == #MArg ifTrue:[^gen pushMethodArg: index].
   166         kind == #MVar ifTrue:[^gen pushMethodVar: index].
   166         kind == #MVar ifTrue:[^gen pushMethodVar: index].
   167         kind == #BArg ifTrue:[^gen pushBlockArg: index].
   167         kind == #BArg ifTrue:[^gen pushBlockArg: index].
   168         kind == #BVar ifTrue:[^gen pushBlockVar: index].
   168         kind == #BVar ifTrue:[^gen pushBlockVar: index].
   169 
   169 
   170         self halt:'Should never be reached'.
   170         self error:'Should never be reached'.
   171 
   171 
   172     "Created: / 30-03-2009 / 14:06:28 / Jan Vrany <vranyj1@fel.cvut.cz>"
   172     "Created: / 30-03-2009 / 14:06:28 / Jan Vrany <vranyj1@fel.cvut.cz>"
   173     "Modified: / 30-03-2009 / 19:02:32 / Jan Vrany <vranyj1@fel.cvut.cz>"
   173     "Modified: / 30-03-2009 / 19:02:32 / Jan Vrany <vranyj1@fel.cvut.cz>"
       
   174     "Modified: / 09-04-2010 / 15:05:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   174 !
   175 !
   175 
   176 
   176 remoteReturn
   177 remoteReturn
   177 
   178 
   178 	self doPending.
   179 	self doPending.