Commit | Line | Data |
---|---|---|
960da368 BJ |
1 | # |
2 | # vgrind | |
3 | # | |
4 | set b=/usr/lib | |
5 | set o= | |
6 | set t= | |
7 | set wide = "" | |
8 | top: | |
9 | if ($#argv > 1) then | |
10 | switch ($1:q) | |
11 | ||
12 | case -t: | |
13 | set t=-t | |
14 | shift | |
15 | goto top | |
16 | ||
17 | case -o*: | |
18 | set o=$1:q | |
19 | shift | |
20 | goto top | |
21 | case -W: | |
22 | set wide = "-W" | |
23 | shift | |
24 | goto top | |
25 | endsw | |
26 | endif | |
27 | if (-r index) then | |
28 | echo > nindex | |
29 | foreach i ($*:q) | |
30 | echo "/ $i /d" >> nindex | |
31 | end | |
32 | sed -f nindex index >xindex | |
33 | $b/vfontedpr $*:q | \ | |
34 | /bin/sh -c "vtroff $t $wide -rx1 $o -i -mvgrind 2>> xindex" | |
35 | sort -df +0 -2 xindex >index | |
36 | rm nindex xindex | |
37 | else | |
38 | $b/vfontedpr $*:q | vtroff $t $wide -i $o -mvgrind | |
39 | endif |