mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 22:40:34 +02:00
Code Activity

* filter-doc-snarfage.c, guile-snarf.in: try to cope with spaces

Browse source 
inside cookies.  thanks to Matthias Köppe!
This commit is contained in:
Michael Livshin 2001-06-08 13:48:39 +00:00
parent bab246f334
commit 47bcd6465f
3 changed files with 11 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/guile-snarf.in
View file

@ -27,7 +27,7 @@ test -n "${CPP+set}" || CPP="@CPP@"
## 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_SNARF_INITS "$@" > ${temp} || exit $?
< ${temp} grep "^ *\^\^" | sed -e "s/^ *\^\^//"
< ${temp} grep "^ *\^ *\^" | sed -e "s/^ *\^ *\^//"
## Apparently, AIX's preprocessor is unhappy if you try to #include an
## empty file.