Hi Meinert,
does this code work for you:
|view|
view := RTMondrian new.
view nodes: ArrayedCollection withAllSubclasses.
view edges objects: (ArrayedCollection withAllSubclasses); connectToAll: [ :cls | cls
referencedClasses ].
view circleLayout.
view inspect
To be honest, I did not yet really fully understand the edge builder. So sometimes it
works, sometimes not for me. Maybe I missed some documentation or good explanation on it
:-)
Best regards,
Rainer
-----Original-Nachricht-----
Von: "Meinert Schwartau" <m.schwartau(a)gmail.com>
An: moose-dev(a)list.inf.unibe.ch
Datum: 08/10/16 09:04
Betreff: [Moose-dev] Problems with mondorian
Hi,
I want to display the dependencies between my classes. I wonder why the following code
does not work, it displays the classes in a circle but not the edges between them. I'm
using Moose 6 und Pharo 5 (downloaded yesterday) and evaluated the following code in the
moose panel in the evaluator:
|view|
view := RTMondrian new.
view nodes: ArrayedCollection withAllSubclasses.
view edges: (ArrayedCollection withAllSubclasses) from: [ :cls | cls yourself ] to: [
:cls | cls referencedClasses ].
view circleLayout.
view
Then I tried to display the dependencies between my own classes (parsed by jdt2famix) but
got an exception. After clicking on All classes in the moose panel I entered the following
code in the evaluator:
|view allClasses|
view := RTMondrian new.
allClasses := self allClasses.
view nodes: allClasses.
view edges: allClasses from: [ :cls | cls yourself ] to: [ :cls | cls providerTypes].
view circleLayout.
view
If I execute the code above, I get an "MessageNotUnderstood: reveiver of
"atScope:" is nil" exception. If I remove the "view edges: allClasses
from: [ :cls | cls yourself ] to: [ :cls | cls providerTypes]." statement I
don't get an exception, the RTMondorian view opens, but no classes are displayed as
dots in the view.
Any suggestions?
Best regards
Meinert
_______________________________________________
Moose-dev mailing list
Moose-dev(a)list.inf.unibe.ch
https://www.list.inf.unibe.ch/listinfo/moose-dev