summaryrefslogtreecommitdiff
path: root/libguile/guile-snarf.in
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2002-04-17 17:44:28 +0000
committerMarius Vollmer <mvo@zagadka.de>2002-04-17 17:44:28 +0000
commit9d2cce766ddd2055021fc55b0866a0a89f33966e (patch)
tree2631183798dec52d216e6cee0447cc8068b007f7 /libguile/guile-snarf.in
parenta3451a590ef1bac98521566eb81179d46515fe17 (diff)
downloadguile-9d2cce766ddd2055021fc55b0866a0a89f33966e.tar.gz
Do not clean input file. This would write to the $(srcdir) during a
VPATH build, which is not allowed. It also isn't needed since it only works when an output filename has been specified and in that case we don't need to clean the input file because the output file will already exist.
Diffstat (limited to 'libguile/guile-snarf.in')
-rw-r--r--libguile/guile-snarf.in17
1 files changed, 2 insertions, 15 deletions
diff --git a/libguile/guile-snarf.in b/libguile/guile-snarf.in
index aaa6926d6..3d9ac957b 100644
--- a/libguile/guile-snarf.in
+++ b/libguile/guile-snarf.in
@@ -24,11 +24,7 @@
#
# Process INFILE using the C pre-processor and some other programs.
# Write output to a file named OUTFILE or to the standard output when no
-# OUTFILE has been specified or when OUTFILE is "-". When writing
-# to a file, ignore lines from the input matching the following grep(1)
-# regular expression:
-#
-# ^#include ".*OUTFILE"
+# OUTFILE has been specified or when OUTFILE is "-".
#
# If there are errors during processing, delete OUTFILE and exit with
# non-zero status.
@@ -110,16 +106,7 @@ if [ x"$CPP" = x ] ; then cpp="@CPP@" ; else cpp="$CPP" ; fi
trap "rm -f $temp" 0 1 2 15
if [ ! "$outfile" = "-" ]; then
- self_blind_regexp='^#include ".*'`basename $outfile`'"'
- clean_infile=$infile.clean.c # temp file in same dir as infile
- # so that #include "foo" works
- # (e.g., see libguile/eval.c).
- # use .c to satisfy cpp heuristics.
-
- # clean input file
- trap "rm -f $cleanfile" 0 1 2 15
- grep -v "$self_blind_regexp" $infile > $clean_infile
- modern_snarf "$@" $clean_infile > $outfile
+ modern_snarf "$@" $infile > $outfile
else
modern_snarf "$@" $infile
fi