blob: 395883f7ccbf3b5ab039989af17279d66fe61c41 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
$NetBSD: patch-libguile_guile-snarf.in,v 1.2 2013/11/13 22:49:31 joerg Exp $
--- libguile/guile-snarf.in.orig 2010-12-13 17:24:40.000000000 +0000
+++ libguile/guile-snarf.in
@@ -51,7 +51,8 @@ modern_snarf ()
## empty file.
echo "/* cpp arguments: $@ */" ;
${cpp} -DSCM_MAGIC_SNARF_INITS -DSCM_MAGIC_SNARFER "$@" > ${temp} && cpp_ok_p=true
- grep "^ *\^ *\^" ${temp} | sed -e "s/^ *\^ *\^//" -e "s/\^\ *:\ *\^.*/;/"
+ grep -v '^#' ${temp} | tr '\n' ' ' | sed 's,\^ *\^,\
+&,g' | grep "^ *\^ *\^" | sed -e "s/^ *\^ *\^//" -e "s/\^\ *:\ *\^.*/;/"
}
## main
|
