cwebber pushed a commit to branch wip-elisp-rebased
in repository guile.
commit e43096bc71d76fb8ae4a80ae5924b1addb515c77
Author: Robin Templeton <[email protected]>
AuthorDate: Sat Jun 14 16:16:32 2014 -0400
guile-snarf fix
(Best-ability ChangeLog annotation added by Christopher Allan Webber.)
* libguile/guile-snarf.in (modern_snarf): Adjusted.
---
libguile/guile-snarf.in | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/libguile/guile-snarf.in b/libguile/guile-snarf.in
index 22dc1d3..01fd7a1 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
