summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Livshin <mlivshin@bigfoot.com>2000-06-21 15:14:00 +0000
committerMichael Livshin <mlivshin@bigfoot.com>2000-06-21 15:14:00 +0000
commit7f40b48a9f199527a2d45a560873606ce779970a (patch)
tree1286a0ca1bef1c879f3941ecc886bf357ee122de
parentc7b6388d1e20c31e0e773afd66209b9f92fceafd (diff)
downloadguile-7f40b48a9f199527a2d45a560873606ce779970a.tar.gz
* guile-doc-snarf.in: use cut instead of sed, that's much much
faster. also, don't call basename more than needed. and, to gain a couple of microseconds more, don't call cat needlessly. (thanks to Brad Knotwell).
-rw-r--r--THANKS1
-rw-r--r--libguile/ChangeLog7
-rwxr-xr-xlibguile/guile-doc-snarf.in3
3 files changed, 9 insertions, 2 deletions
diff --git a/THANKS b/THANKS
index 05b5810f7..f2dce3777 100644
--- a/THANKS
+++ b/THANKS
@@ -9,3 +9,4 @@ Contributors since the last release:
For fixes or providing information which led to a fix:
+ Brad Knotwell
diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index d575c7c7e..16631ddd9 100644
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,10 @@
+2000-06-21 Michael Livshin <mlivshin@bigfoot.com>
+
+ * guile-doc-snarf.in: use cut instead of sed, that's much much
+ faster. also, don't call basename more than needed. and, to gain
+ a couple of microseconds more, don't call cat needlessly. (thanks
+ to Brad Knotwell).
+
2000-06-21 Dirk Herrmann <D.Herrmann@tu-bs.de>
* guile-snarf.awk.in, guile-snarf.in, snarf.h: Rename SCM__I to
diff --git a/libguile/guile-doc-snarf.in b/libguile/guile-doc-snarf.in
index 89dcc04ee..cce78ed89 100755
--- a/libguile/guile-doc-snarf.in
+++ b/libguile/guile-doc-snarf.in
@@ -28,5 +28,4 @@ ${AWK} -f guile-func-name-check "$fullfilename"
## We must use a temporary file here, instead of a pipe, because we
## need to know if CPP exits with a non-zero status.
${CPP} -DSCM_MAGIC_SNARFER "$@" > ${temp} || exit $?
-cat ${temp} | sed 's/^\(.\{128\}.\{128\}.\{128\}.\{128\}.\{128\}.\{128\}.\{128\}.\{128\}\).*/\1/g' | \
-${AWK} -f `dirname $0`/guile-snarf.awk `basename ${dot_doc}`
+cut -c1-1023 ${temp} | ${AWK} -f `dirname $0`/guile-snarf.awk ${dot_doc}