push
github
3113 of 7018 new or added lines in 252 files covered. (44.36%)
425 existing lines in 35 files now uncovered.17702 of 27712 relevant lines covered (63.88%)
1.28 hits per line
1 |
Class { |
|
2 |
#name : #MiHSystemComplexityStyle, |
|
3 |
#superclass : #HDefaultStyle, |
|
4 |
#category : #'MooseIDE-Visualization-System Complexity' |
|
5 |
} |
|
6 |
|
|
7 |
{ #category : #'public - hooks' } |
|
NEW
|
MiHSystemComplexityStyle >> borderFor: node [ |
× |
NEW
|
|
× |
NEW
|
^ node hasChildren |
× |
NEW
|
ifTrue: [ |
× |
NEW
|
RSBorder new
|
× |
NEW
|
width: 2;
|
× |
NEW
|
capSquare; |
× |
NEW
|
joinMiter; |
× |
NEW
|
color: Smalltalk ui theme textColor;
|
× |
NEW
|
dashArray: #( 5 10 ); |
× |
NEW
|
yourself ] |
× |
NEW
|
ifFalse: [ |
× |
NEW
|
RSBorder new
|
× |
NEW
|
color: Color black translucent; |
× |
NEW
|
yourself ] |
× |
NEW
|
] |
× |
24 |
|
|
25 |
{ #category : #hooks } |
|
NEW
|
MiHSystemComplexityStyle >> buildCompositeEmptyNodeIn: shape [ |
× |
NEW
|
|
× |
NEW
|
| node | |
× |
NEW
|
node := shape model. |
× |
NEW
|
node level <= 1 ifTrue: [
|
× |
NEW
|
shape |
× |
NEW
|
color: Color black; |
× |
NEW
|
border: (self borderFor: node).
|
× |
NEW
|
shape schildren: #( ).
|
× |
NEW
|
|
× |
NEW
|
^ self ]. |
× |
NEW
|
|
× |
NEW
|
|
× |
NEW
|
super buildCompositeEmptyNodeIn: shape |
× |
NEW
|
] |
× |