1 3940506b 2005-01-13 devnull #!/usr/local/plan9/bin/rc
2 3940506b 2005-01-13 devnull # Usage: sig key ...
3 3940506b 2005-01-13 devnull # prints out function signatures by grepping the manual
6 3940506b 2005-01-13 devnull *=`{echo $*|tr A-Z a-z|tr -dc 'a-z0-9_ \012'} # fold case, delete funny chars
7 3940506b 2005-01-13 devnull if(~ $#* 0){
8 3940506b 2005-01-13 devnull echo Usage: sig function ... >[1=2]
12 3940506b 2005-01-13 devnull for (i) {
13 9bbe4594 2005-01-14 devnull files=`{grep -il '[ ]\*?'$i'\(' $PLAN9/man/man3/*.3*}
14 3940506b 2005-01-13 devnull for(j in $files) {
15 3940506b 2005-01-13 devnull {echo .nr LL 20i; 9 sed -n '/^.SH SYNOPSIS/,/^.SH.*DESCR/p' $j } |
16 9bbe4594 2005-01-14 devnull nroff -man |
24 3940506b 2005-01-13 devnull s/[ ]+/ /g' |
25 9bbe4594 2005-01-14 devnull grep -i -e '[ ]\*?'$i'\(' | sed 's/^[ +]/ /'