"{ Package: 'stx:libbasic3' }"
ClassChange subclass:#ClassOtherChange
instanceVariableNames:'type objectType'
classVariableNames:''
poolDictionaries:''
category:'System-Changes'
!
!ClassOtherChange methodsFor:'accessing'!
objectType
"return the value of the instance variable 'objectType' (automatically generated)"
^ objectType
!
objectType:something
"set the value of the instance variable 'objectType' (automatically generated)"
objectType := something.
!
source
type == #initialize ifTrue:[
^ self className , ' initialize'.
].
self halt.
!
type
"return the value of the instance variable 'type' (automatically generated)"
^ type
!
type:something
"set the value of the instance variable 'type' (automatically generated)"
type := something.
! !
!ClassOtherChange class methodsFor:'documentation'!
version
^ '$Header: /cvs/stx/stx/libbasic3/ClassOtherChange.st,v 1.3 2003-06-28 19:01:46 cg Exp $'
! !