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@gmail.com>
An: moose-dev@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@list.inf.unibe.ch
https://www.list.inf.unibe.ch/listinfo/moose-dev