mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 14:00:21 +02:00
Code Activity

guile-snarf fix

Browse source 
(Best-ability ChangeLog annotation added by Christine Lemmer-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 Christine Lemmer-Webber
parent c7fe0eb420
commit ad3d498d31
No known key found for this signature in database
GPG key ID: 4BC025925FF8F4D3
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.
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