* debug.c (scm_debug_options): Bugfix: Set the value of

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

diff --git a/libguile/debug.c b/libguile/debug.c
index 507097b..ad5ff80 100644 (file)
--- a/libguile/debug.c
+++ b/libguile/debug.c
@@ -46,6 +46,7 @@
 #include <stdio.h>
 #include "_scm.h"
 #include "eval.h"
+#include "stackchk.h"
 #include "throw.h"
 #include "genio.h"
 #include "macros.h"
@@ -85,6 +86,7 @@ scm_debug_options (setting)
     }
 #endif
   SCM_RESET_DEBUG_MODE;
+  scm_stack_checking_enabled_p = SCM_STACK_CHECKING_P;
   scm_debug_eframe_size = 2 * SCM_N_FRAMES;
   SCM_ALLOW_INTS
   return ans;