[Moose-dev] Re: Testing moose (roassal)

On Sat, Sep 21, 2013 at 2:55 PM, Alexandre Bergel &lt;alexandre.bergel(a)me.com&gt; wrote: I've used Moose to find out what are these dependencies. Here is what I have done. Doru, I can write an entry on your blog if you wish. Problem: Some packages related to the Algorithm have wrongly packaged dependencies. This create problem when these algos are loaded and not Roassal. A solution to this problem: 1 - I've open a Moose panel, imported all the packages that match *Algo* and *Roassal-* 2 - Open a Roassal easel on the model packages and do it the following visualization: -=-=-=-=-=-=-=-=-=-=-=-= | ps moosePaks roassalPaks lbl | ps := packageGroup select: [ :p | p name beginsWith: 'Moose' ]. moosePaks := view node: 'Moose' forIt: [ view shape rectangle size: #numberOfClasses. view interaction action: #inspect. view nodes: ps ]. ROConstraint stick: (lbl := (ROLabel text: 'Moose') element) onTheRightOf: moosePaks. view raw add: lbl. roassalPaks := view node: 'Roassal' forIt: [ view shape rectangle size: #numberOfClasses. view nodes: (packageGroup select: [ :p | p name beginsWith: 'Roassal' ]) ]. ROConstraint stick: (lbl := (ROLabel text: 'Roassal') element) onTheRightOf: roassalPaks. view raw add: lbl. view shape bezierLine color: Color red. view interaction item: 'browse' action: [ :assoc | (assoc key methods select: [ :m | m querySureOutgoingInvocations atPackageScope includes: assoc value ] ) inspect ]. view edges: ps from: #yourself toAll: [ :p | p querySureOutgoingInvocations atPackageScope ]. view verticalLineLayout center verticalGap: 100. -=-=-=-=-=-=-=-=-=-=-=-= I obtain the following screenshot: <Screen Shot 2013-09-21 at 9.23.46 AM.png> Right clicking on a line gives me the list of culprit methods. This view is handy I've find. 3 - I have manually repackaged the culprit methods. For examples, some methods deserved to be move in some of the Roassal packages 4 - I imported again the new version of the packages, run the visualization and I get: <Screen Shot 2013-09-21 at 9.47.55 AM.png> 5 - Again, I have inspected each edge, and fixed the problem. The final visualization is <Screen Shot 2013-09-21 at 9.49.24 AM.png> Problem solved! Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev