Hi
I was following an exercise written by alex and the following code does not work
| superclassEdges |
luModel := (MooseModel allInstances last).
luClasses := luModel allModelClasses.
view shape rectangle size: [ :cls | cls queryAllOutgoingInvocations size ].
view nodes: luClasses.
superclassEdges := view edgesFrom: #superclass.
view treeLayout userDefinedEdges: superclassEdges.
view shape line color: Color red.
view edges: luClasses from: #yourself toAll:
[ :cls | cls queryAllOutgoingInvocations atClassScope ]
edgesFrom: raises an error several candidates.
and I do not understand why.
Stef
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev