Removed syntax for inline assembly, use <primitive: [:asm | ... ]> syntax.
This one is easier to implement and less introusive, syntax-wise. And follows
Smalltalk tradiiton.
"{ Package: 'jv:tea/compiler' }"
"{ NameSpace: Smalltalk }"
RGClassDefinition subclass:#TClassDefinition
instanceVariableNames:'binding'
classVariableNames:''
poolDictionaries:''
category:'Languages-Tea-Compiler-Model'
!
!TClassDefinition methodsFor:'accessing'!
binding
binding isNil ifTrue:[
binding := TClassBinding clazz: self.
].
^ binding
"Modified: / 02-09-2015 / 16:02:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!TClassDefinition methodsFor:'behavior'!
withMetaclass
"Registers explicitly the metaclass of a class"
metaClass:= TMetaDefinition class: self
"Modified: / 31-08-2015 / 11:53:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!TClassDefinition methodsFor:'class variables'!
addClassVarNamed: aString
self shouldNotImplement
"Created: / 31-08-2015 / 15:40:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
addClassVariables: aCollection
self shouldNotImplement
"Created: / 31-08-2015 / 15:38:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!TClassDefinition methodsFor:'instance variables'!
addInstVarNamed: aString
self shouldNotImplement
"Created: / 31-08-2015 / 15:40:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
addInstanceVariables: aCollection
self shouldNotImplement
"Created: / 31-08-2015 / 15:40:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
classVariableNames: aStringOrCollection
aStringOrCollection isEmptyOrNil ifTrue:[ ^ self ].
self notYetImplemented
"Created: / 31-08-2015 / 15:41:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
instanceVariableNames: aStringOrCollection
aStringOrCollection isEmptyOrNil ifTrue:[ ^ self ].
self notYetImplemented
"Created: / 31-08-2015 / 15:40:51 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !