No idea how to reproduce it.
computeVarType
| info tempNames name |
types ifEmpty: [ ^ nil ].
info := types first.
(hasSend and: [ info isDefinedByMessageSend not ])
ifTrue: [
info type: nil.
^ info ].
info isDefinedByTemporary
ifFalse: [ ^ info ].
tempNames := (receiverClass compiler parse: currentMethod sourceCode)
tempNames.
^^^^^^^^^^^^
#()
so the rest breaks.
name := tempNames at: info temporaryOffset + 1.
info type: (self class getClassFromTypeSuggestingName: name).
^ info
