diff options
author | Robin Templeton <robin@terpri.org> | 2014-06-14 16:16:32 -0400 |
---|---|---|
committer | Christine Lemmer-Webber <cwebber@dustycloud.org> | 2021-10-19 18:10:04 -0400 |
commit | ad3d498d31d574a20fd69346adcc357e74166e56 (patch) | |
tree | 3c3870863fa0e8df23f7f7ccdb3b474a767105b3 | |
parent | c7fe0eb420848eea690c5fafd8bab6d86f11c46f (diff) | |
download | guile-ad3d498d31d574a20fd69346adcc357e74166e56.tar.gz |
guile-snarf fix
(Best-ability ChangeLog annotation added by Christine Lemmer-Webber.)
* libguile/guile-snarf.in (modern_snarf): Adjusted.
-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 22dc1d389..01fd7a1ba 100644 --- a/libguile/guile-snarf.in +++ b/libguile/guile-snarf.in @@ -52,7 +52,8 @@ modern_snarf () # writes stdout ## empty file. echo "/* cpp arguments: $@ */" ; ${cpp} -DSCM_MAGIC_SNARF_INITS -DSCM_MAGIC_SNARFER "$@" > ${temp} && cpp_ok_p=true - sed -ne 's/ *\^ *\^ */\ + sed -ne '/^#define /d +s/ *\^ *\^ */\ / s/.*\n// t x |