minor cleanup with STUB macro

diff --git a/runoff b/runoff
index f2cbc01c5d2ee62ff1091f009ff00fe8ba91155e..3da62b4c5631c4eda608e061aee577f8a5a420b0 100755 (executable)
--- a/runoff
+++ b/runoff
@@ -151,7 +151,9 @@ done
 ) >alltext
 
 perl -n -e 'print if s/^([0-9]+ [a-zA-Z0-9_]+)\(.*$/\1/;' alltext |
-       egrep -v ' (usage|main|if|for)$' >>defs
+       egrep -v ' (STUB|usage|main|if|for)$' >>defs
+#perl -n -e 'print if s/^([0-9]+) STUB\(([a-zA-Z0-9_]+)\)$/\1 \2/;' alltext \
+#      >>defs
 (
 >s.defs