diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-08-02 16:10:17 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-08-02 16:10:17 +0000 |
commit | dee91fb9d44138d34ee67b265923951f7206d3c6 (patch) | |
tree | 6297c1e9bb29e20920e5e52550b8e47d7273dab0 | |
parent | ba05058392b57f69d7890d99bce57ca7df64e21e (diff) | |
download | guile-dee91fb9d44138d34ee67b265923951f7206d3c6.tar.gz |
* gen-scmconfig.h.in (SCM_I_GSC_ENABLE_DISCOURAGED): New.
* gen-scmconfig.c (SCM_ENABLE_DISCOURAGED): Emit based on above.
-rw-r--r-- | libguile/gen-scmconfig.c | 6 | ||||
-rw-r--r-- | libguile/gen-scmconfig.h.in | 1 |
2 files changed, 7 insertions, 0 deletions
diff --git a/libguile/gen-scmconfig.c b/libguile/gen-scmconfig.c index e4465c05f..5f1351307 100644 --- a/libguile/gen-scmconfig.c +++ b/libguile/gen-scmconfig.c @@ -226,6 +226,12 @@ main (int argc, char *argv[]) pf ("#define GUILE_DEBUG_FREELIST 1 /* defined or undefined */\n"); else 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) ***/ pf ("\n"); diff --git a/libguile/gen-scmconfig.h.in b/libguile/gen-scmconfig.h.in index f48288672..933aad375 100644 --- a/libguile/gen-scmconfig.h.in +++ b/libguile/gen-scmconfig.h.in @@ -8,6 +8,7 @@ #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_ENABLE_DISCOURAGED @SCM_I_GSC_ENABLE_DISCOURAGED@ #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_HAVE_ARRAYS @SCM_I_GSC_HAVE_ARRAYS@ |