mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 20:30:28 +02:00
Code Activity

guile-snarf fix

Browse source 
(Best-ability ChangeLog annotation added by Christopher Allan Webber.)

* libguile/guile-snarf.in (modern_snarf): Adjusted.
This commit is contained in:
Robin Templeton 2014-06-14 16:16:32 -04:00 • committed by Christopher Allan Webber
parent e97833382e
commit ca0e317e5b
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/guile-snarf.in
View file

@ -52,7 +52,8 @@ modern_snarf () # writes stdout
## empty file. ## empty file.
echo "/* cpp arguments: $@ */" ; echo "/* cpp arguments: $@ */" ;
${cpp} -DSCM_MAGIC_SNARF_INITS -DSCM_MAGIC_SNARFER "$@" > ${temp} && cpp_ok_p=true ${cpp} -DSCM_MAGIC_SNARF_INITS -DSCM_MAGIC_SNARFER "$@" > ${temp} && cpp_ok_p=true
sed -ne 's/ *\^ *\^ */\ sed -ne '/^#define /d
s/ *\^ *\^ */\
/ /
s/.*\n// s/.*\n//
t x t x