23 Nov
2007
23 Nov
'07
9:34 p.m.
testInstanceAndClassSideWhenMergingClassAndMetaclass
| node |
node := self model entityNamed:
#'Root::Smalltalk::ReferenceModel::TheRoot'.
self assert: (self model entityNamed:
#'Root::Smalltalk::ReferenceModel::TheRoot_class' ifAbsent: [nil])
isNil.
self assert: node instanceSide == node.
self assert: node classSide == nil.
nil or node ?
I would prefer node so that we get a circular situation
Stef