summaryrefslogtreecommitdiff
path: root/runoff
diff options
context:
space:
mode:
authorrsc <rsc>2007-08-28 18:23:48 +0000
committerrsc <rsc>2007-08-28 18:23:48 +0000
commitc1b100e93044469de30c634107bc645361cc1a73 (patch)
treee5e1ead7fa029917abdde9ed0fa9bdb45597d085 /runoff
parent3e1eaf226d501fc4f57592e1c75c885f8b2e5d99 (diff)
downloadxv6-labs-c1b100e93044469de30c634107bc645361cc1a73.tar.gz
xv6-labs-c1b100e93044469de30c634107bc645361cc1a73.tar.bz2
xv6-labs-c1b100e93044469de30c634107bc645361cc1a73.zip
nits
Diffstat (limited to 'runoff')
-rwxr-xr-xrunoff22
1 files changed, 18 insertions, 4 deletions
diff --git a/runoff b/runoff
index 3869391..37ca014 100755
--- a/runoff
+++ b/runoff
@@ -134,7 +134,19 @@ perl -e '
}
' $files >defs
-perl -n -e 'print if s/^([0-9]+ [a-zA-Z0-9_]+)\(.*$/\1/;' $files |
+(for i in $files
+do
+ case "$i" in
+ *.S)
+ cat $i | sed 's;#.*;;; s;//.*;;;'
+ ;;
+ *)
+ cat $i | sed 's;//.*;;; s;"([^"\\]|\\.)*";;;'
+ esac
+done
+) >alltext
+
+perl -n -e 'print if s/^([0-9]+ [a-zA-Z0-9_]+)\(.*$/\1/;' alltext |
egrep -v ' (usage|main|if|for)$' >>defs
(
>s.defs
@@ -144,9 +156,11 @@ for i in `awk '{print $2}' defs | sort -fu`
do
defs=`egrep '^[0-9]+ '$i'( |$)' defs | awk '{print $1}'`
echo $i $defs >>s.defs
- uses=`egrep -h '([^a-zA-Z_0-9])'$i'($|[^a-zA-Z_0-9])' $files | awk '{print $1}'`
- echo $i $defs
- echo $uses |fmt -24 | sed 's/^/ /'
+ uses=`egrep -h '([^a-zA-Z_0-9])'$i'($|[^a-zA-Z_0-9])' alltext | awk '{print $1}'`
+ if [ "x$defs" != "x$uses" ]; then
+ echo $i $defs
+ echo $uses |fmt -24 | sed 's/^/ /'
+ fi
done
) >refs