Hi,
It is easier to answer if we can take a look at the actual code. Where can I load it from?
Cheers, Doru
On Jul 24, 2008, at 5:54 PM, Menanteau Jannick wrote:
Hi all,
I would like to make unitary test for several Moose methods. In this context, I don't use the Moose interface.
I've done this in a method : model := MooseModel new name: 'model'. importer := NameSpaceImporter new importingContext: (NameSpaceImporter new importingContext mergeClassAndMetaclass). importer model: model; add: Pack1; run. i := (model entityNamed:#'ModelForQualixoTest') definedClasses . l := (model entityNamed:#'Root::Smalltalk::Pack1::Class1Pack1') fanOut. k := (model entityNamed:#'Root::Smalltalk::Pack1::Class2Pack1') fanOut.
Class1Pack1 create new object from Class2Pack1. fanOut for Class1Pack1 must be 1.
The result waited is : i = OrderedCollection --> ok l = 1 --> it returns 0 k = 0 --> ok
In Moose interface, the result is good. I don't know what is the problem :(
Thanks for helping _______________________________________________ Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-- www.tudorgirba.com www.tudorgirba.com/blog
"Beauty is where we see it."