I do not understand what the following is supposed to do:
view shape rectangle size: 20.
view nodes: ( Magnitude withAllSubclasses flatCollect: [ :e | e methodDict values ])
.
view edgesFrom: [ :e | [e superclass] on: Exception do: [ e methodClass ] ].
view layout: ROTreeLayout .
Maybe you forgot to have before: view nodes: ( Magnitude withAllSubclasses).
?
Alexandre
On Jul 25, 2013, at 6:41 AM, mathieubmddehouck(a)mailoo.org wrote:
Try this:
"Source code: ROMondrianExample>>treeLayoutOn:"
"Preambule. It includes the initialization. "
| view rawView |
rawView := ROView new.
view := ROMondrianViewBuilder view: rawView.
"-------------"
"-------------"
view shape rectangle size: 20.
view nodes: ( Magnitude withAllSubclasses flatCollect: [ :e | e methodDict values ])
.
view edgesFrom: [ :e | [e superclass] on: Exception do: [ e methodClass ] ].
view layout: ROTreeLayout .
"view edges do: [ :e | e - ROLine ]."
"-------------"
"-------------"
"Below is the initiation of the menu and opening the visualization"
ROEaselMorphic new populateMenuOn: view.
view open
Regards
Mathieu
_______________________________________________
Moose-dev mailing list
Moose-dev(a)iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel
http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.