forked from Lainports/opnsense-ports
12 lines
490 B
Text
12 lines
490 B
Text
--- libguile/guile-snarf.in.orig 2010-12-13 17:24:40 UTC
|
|
+++ 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/\^\ *:\ *\^.*/;/"
|
|
+ sed -e 's/\^ *\^/\
|
|
+^^/g' ${temp} | grep "^.*\^ *\^" | sed -e "s/^.*\^ *\^//" -e "s/\^\ *:\ *\^.*/;/"
|
|
}
|
|
|
|
## main
|