blob: 4ee6939a871ea684a8d63fad971bf8978c406ca7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
#!/bin/bash
args="-r Todo"
graphmod $args "$@" \
-i . -i Presence \
Presence/main.hs \
| awk 'BEGIN{n=1;}
!/label="Main"/{print;}
/label="Main"/{if(n==1) print;n=n+1;}' \
| sed '2isize="13,8!"; ratio=fill;' \
> modules.dot
fgnode="$(sed -n '/label="FGConsole"/{s#\(.*\)\[.*#\1#; p}' modules.dot)"
cat modules.dot | sed '3'i$fgnode'->monitortty;\
monitortty[label="monitortty.c"];' | dot -Tsvg > modules.svg
|