* deprecated.h, boolean.h (SCM_FALSEP, SCM_NFALSEP, SCM_BOOL,

[bpt/guile.git] / libguile / deprecation.c

diff --git a/libguile/deprecation.c b/libguile/deprecation.c
index e4597df..2c7d2a4 100644 (file)
--- a/libguile/deprecation.c
+++ b/libguile/deprecation.c
@@ -142,7 +142,7 @@ SCM_DEFINE(scm_include_deprecated_features,
            "in public interfaces.")
 #define FUNC_NAME s_scm_include_deprecated_features
 {
-  return SCM_BOOL (SCM_ENABLE_DEPRECATED == 1);
+  return scm_from_bool (SCM_ENABLE_DEPRECATED == 1);
 }
 #undef FUNC_NAME