b := RTDependencyAnalyzerBuilder new.
b shape circle
size: 10;
fillColor: (Color red alpha: 0.3);
if: [ :cls | ('TR*' match: cls name) ] fillColor: (Color purple alpha: 0.3).
b addClasses: RTObject withAllSubclasses. “Roassal2 classes"
b addClasses: TRObject withAllSubclasses. “Trachel classes"
b
dependencyFromAllClassesMatching: [ :cls | ('RT*' match: cls name) ]
toAllClassesMatching: [ :cls | ('TR*' match: cls name) ].
b open
Here a screenshot:
Blue lines are dependencies between Roassal classes to Trachel classes.
Purple = trachel
Red = Roassal
If some want to try this, I will be more than happy to share (actually it is available on Roassal2 @ Smalltalkhub).
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.