1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 04:10:18 +02:00
guile/libguile/guile-snarf.in
Jim Blandy 7677589ac6 * guile-snarf.in: Be sure to exit with an error if CPP does.
* Makefile.am (.c.x): Delete the .x file and exit with an error
status if guile-snarf exits with an error status.
* Makefile.in: Regenerated.
1999-09-05 13:47:23 +00:00

17 lines
533 B
Bash

#!/bin/sh
# Extract the initialization actions for builtin things.
temp="/tmp/snarf.$$"
trap "rm -f $temp" 0 1 2 15
## Let the user override the preprocessor autoconf found.
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_SNARFER "$@" > ${temp} || exit $?
< ${temp} grep "^ *% *% *%" | sed -e "s/^ *% *% *%//"
## Apparently, AIX's preprocessor is unhappy if you try to #include an
## empty file.
echo