diff options
author | Marius Vollmer <mvo@zagadka.de> | 2002-04-16 20:12:10 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2002-04-16 20:12:10 +0000 |
commit | 3be0d96d0f9d79a65b92824736be0a295e9386b7 (patch) | |
tree | 7a2707d5a81c419f269c495f40b28ea0bdea7ece /libguile/guile-snarf.in | |
parent | 21550b108e47d7fa97fea93aeb70f9fdacd94132 (diff) | |
download | guile-3be0d96d0f9d79a65b92824736be0a295e9386b7.tar.gz |
Install the trap for removing $cleanfile only when the value of
$cleanfile is actually known.
Diffstat (limited to 'libguile/guile-snarf.in')
-rw-r--r-- | libguile/guile-snarf.in | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/guile-snarf.in b/libguile/guile-snarf.in index 67fbddda7..aaa6926d6 100644 --- a/libguile/guile-snarf.in +++ b/libguile/guile-snarf.in @@ -107,7 +107,7 @@ cpp_ok_p=false temp="/tmp/snarf.$$" if [ x"$CPP" = x ] ; then cpp="@CPP@" ; else cpp="$CPP" ; fi -trap "rm -f $temp $clean_infile" 0 1 2 15 +trap "rm -f $temp" 0 1 2 15 if [ ! "$outfile" = "-" ]; then self_blind_regexp='^#include ".*'`basename $outfile`'"' @@ -117,6 +117,7 @@ if [ ! "$outfile" = "-" ]; then # 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 else |