[Moose-dev] Re: Unitary Test with Moose don't work

[Tudor Girba]

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 at 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."