Smalltalk › Frameworks & Tools › Moose

roassal question

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

4 messages Options

Nicolas Anquetil

roassal question

This is one that I already had several times and could not find a proper
answer:

How to have nodes grouped in containers (e.g. classes in packages) and
links from one inner node (i.e. a class) to another one possibly from a
different container (e.g. inheritance links from one package to another
one) ?

nicolas

--
Nicolas Anquetil
RMod team -- Inria Lille

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev

Fuhrmanator

Re: roassal question

Hi Nicolas,

I'm still a Roassal newbie but there is an example that might be a good starting point:

exampleConditionalLayout

| b |

b := RTMondrian new.

b shape rectangle

fillColor: Color white;

borderColor: Color lightGray;

withTextAbove: #name.

b nodes: Collection withAllSubclasses forEach: [ :cls |

b nodes: cls rtmethods.

b edges connectToAll: #dependentMethods.

b layout

ifElement: #isConnected then: RTTreeLayout new;

else: RTGridLayout new.

b edges connectFrom: #superclass.

b layout tree.

b build.

^ b view

On Tue, Apr 10, 2018 at 10:10 AM, Nicolas Anquetil <[hidden email]> wrote:

This is one that I already had several times and could not find a proper answer:

How to have nodes grouped in containers (e.g. classes in packages) and links from one inner node (i.e. a class) to another one possibly from a different container (e.g. inheritance links from one package to another one) ?

nicolas

--
Nicolas Anquetil
RMod team -- Inria Lille

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev

abergel

Re: roassal question

In reply to this post by Nicolas Anquetil

Easy:

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

packages := #('Announcements-Tests-Core' 'Announcements-Core') collect: [ :pName | RPackageOrganizer default packageNamed: pName ].

b := RTMondrian new.
b shape box withTextAbove: #packageName.
b nodes: packages forEach: [ :pak |
b nodes: pak classes.
b edges connectToAll: #subclasses.
b layout tree. ].

b shape line color: Color blue trans.
b edges
objects: (packages flatCollect: #definedClasses);
connectToAll: #dependentClasses.
b

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

Cheers,

Alexandre

On Apr 10, 2018, at 4:10 PM, Nicolas Anquetil <[hidden email]> wrote:

This is one that I already had several times and could not find a proper answer:

How to have nodes grouped in containers (e.g. classes in packages) and links from one inner node (i.e. a class) to another one possibly from a different container (e.g. inheritance links from one package to another one) ?

nicolas

--
Nicolas Anquetil
RMod team -- Inria Lille

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev

Nicolas Anquetil

Re: roassal question

great !

thanks

nicolas

On 10/04/2018 17:16, Alexandre Bergel wrote:

Easy:

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

packages := #('Announcements-Tests-Core' 'Announcements-Core') collect: [ :pName | RPackageOrganizer default packageNamed: pName ].

b := RTMondrian new.
b shape box withTextAbove: #packageName.
b nodes: packages forEach: [ :pak |
b nodes: pak classes.
b edges connectToAll: #subclasses.
b layout tree. ].

b shape line color: Color blue trans.
b edges
objects: (packages flatCollect: #definedClasses);
connectToAll: #dependentClasses.
b

-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

Cheers,

Alexandre

On Apr 10, 2018, at 4:10 PM, Nicolas Anquetil <[hidden email]> wrote:

This is one that I already had several times and could not find a proper answer:

How to have nodes grouped in containers (e.g. classes in packages) and links from one inner node (i.e. a class) to another one possibly from a different container (e.g. inheritance links from one package to another one) ?

nicolas

--
Nicolas Anquetil
RMod team -- Inria Lille

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev
_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev

-- 
Nicolas Anquetil
RMod team -- Inria Lille

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.list.inf.unibe.ch/listinfo/moose-dev