summaryrefslogtreecommitdiff
path: root/libguile/continuations.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/continuations.c')
-rw-r--r--libguile/continuations.c9
1 files changed, 1 insertions, 8 deletions
diff --git a/libguile/continuations.c b/libguile/continuations.c
index de39d52b5..a57a271e7 100644
--- a/libguile/continuations.c
+++ b/libguile/continuations.c
@@ -22,6 +22,7 @@
#include <string.h>
+#include "libguile/debug.h"
#include "libguile/root.h"
#include "libguile/stackchk.h"
#include "libguile/smob.h"
@@ -29,10 +30,6 @@
#include "libguile/dynwind.h"
#include "libguile/values.h"
-#ifdef DEBUG_EXTENSIONS
-#include "libguile/debug.h"
-#endif
-
#include "libguile/validate.h"
#include "libguile/continuations.h"
@@ -131,9 +128,7 @@ scm_make_continuation (int *first)
continuation->throw_value = SCM_EOL;
continuation->base = src = rootcont->base;
continuation->seq = rootcont->seq;
-#ifdef DEBUG_EXTENSIONS
continuation->dframe = scm_last_debug_frame;
-#endif
SCM_NEWSMOB (cont, scm_tc16_continuation, continuation);
SCM_EXIT_A_SECTION;
@@ -215,9 +210,7 @@ copy_stack_and_call (scm_t_contregs *continuation, SCM val,
memcpy (dst, continuation->stack,
sizeof (SCM_STACKITEM) * continuation->num_stack_items);
-#ifdef DEBUG_EXTENSIONS
scm_last_debug_frame = continuation->dframe;
-#endif
continuation->throw_value = val;
#ifdef __ia64__