From dee91fb9d44138d34ee67b265923951f7206d3c6 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Mon, 2 Aug 2004 16:10:17 +0000 Subject: [PATCH] * gen-scmconfig.h.in (SCM_I_GSC_ENABLE_DISCOURAGED): New. * gen-scmconfig.c (SCM_ENABLE_DISCOURAGED): Emit based on above. --- libguile/gen-scmconfig.c | 6 ++++++ libguile/gen-scmconfig.h.in | 1 + 2 files changed, 7 insertions(+) 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@