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

* gen-scmconfig.h.in (SCM_I_GSC_ENABLE_DISCOURAGED): New.

Browse source 
* gen-scmconfig.c (SCM_ENABLE_DISCOURAGED): Emit based on above.
This commit is contained in:
Marius Vollmer 2004-08-02 16:10:17 +00:00
parent ba05058392
commit dee91fb9d4
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/gen-scmconfig.c
View file

@ -227,6 +227,12 @@ main (int argc, char *argv[])
else else
pf ("/* #undef GUILE_DEBUG_FREELIST */\n"); pf ("/* #undef GUILE_DEBUG_FREELIST */\n");
/*** SCM_ENABLE_DISCOURAGED (0 or 1) ***/
pf ("\n");
pf ("/* Set to 1 if you want to enable discouraged features. */\n");
pf ("/* (value will be 0 or 1). */\n");
pf ("#define SCM_ENABLE_DISCOURAGED %d\n", SCM_I_GSC_ENABLE_DISCOURAGED);
/*** SCM_ENABLE_DEPRECATED (0 or 1) ***/ /*** SCM_ENABLE_DEPRECATED (0 or 1) ***/
pf ("\n"); pf ("\n");
pf ("/* Set to 1 if you want to enable deprecated features. */\n"); pf ("/* Set to 1 if you want to enable deprecated features. */\n");

1
libguile/gen-scmconfig.h.in
View file

@ -8,6 +8,7 @@
#define SCM_I_GSC_GUILE_DEBUG @SCM_I_GSC_GUILE_DEBUG@ #define SCM_I_GSC_GUILE_DEBUG @SCM_I_GSC_GUILE_DEBUG@
#define SCM_I_GSC_GUILE_DEBUG_FREELIST @SCM_I_GSC_GUILE_DEBUG_FREELIST@ #define SCM_I_GSC_GUILE_DEBUG_FREELIST @SCM_I_GSC_GUILE_DEBUG_FREELIST@
#define SCM_I_GSC_ENABLE_DISCOURAGED @SCM_I_GSC_ENABLE_DISCOURAGED@
#define SCM_I_GSC_ENABLE_DEPRECATED @SCM_I_GSC_ENABLE_DEPRECATED@ #define SCM_I_GSC_ENABLE_DEPRECATED @SCM_I_GSC_ENABLE_DEPRECATED@
#define SCM_I_GSC_ENABLE_ELISP @SCM_I_GSC_ENABLE_ELISP@ #define SCM_I_GSC_ENABLE_ELISP @SCM_I_GSC_ENABLE_ELISP@
#define SCM_I_GSC_HAVE_ARRAYS @SCM_I_GSC_HAVE_ARRAYS@ #define SCM_I_GSC_HAVE_ARRAYS @SCM_I_GSC_HAVE_ARRAYS@