From d0f6ceb84f26b033d6f1ac8bbc2acf81efc29f22 Mon Sep 17 00:00:00 2001 From: Dirk Herrmann Date: Sun, 20 Apr 2003 07:19:38 +0000 Subject: * Removed uses of DEBUG_EXTENSIONS and DYNAMIC_LINKING to fix compile errors with --disable-deprecated. --- libguile/root.c | 6 ------ 1 file changed, 6 deletions(-) (limited to 'libguile/root.c') diff --git a/libguile/root.c b/libguile/root.c index bb239f790..c98b29176 100644 --- a/libguile/root.c +++ b/libguile/root.c @@ -230,9 +230,7 @@ scm_internal_cwdr (scm_t_catch_body body, void *body_data, contregs->base = stack_start; contregs->seq = ++n_dynamic_roots; contregs->throw_value = SCM_BOOL_F; -#ifdef DEBUG_EXTENSIONS contregs->dframe = 0; -#endif SCM_NEWSMOB (new_rootcont, scm_tc16_continuation, contregs); } old_rootcont = scm_rootcont; @@ -244,10 +242,8 @@ scm_internal_cwdr (scm_t_catch_body body, void *body_data, */ old_winds = scm_dynwinds; scm_dowinds (SCM_EOL, scm_ilength (scm_dynwinds)); -#ifdef DEBUG_EXTENSIONS SCM_DFRAME (old_rootcont) = scm_last_debug_frame; scm_last_debug_frame = 0; -#endif { my_handler_data.run_handler = 0; @@ -258,9 +254,7 @@ scm_internal_cwdr (scm_t_catch_body body, void *body_data, scm_dowinds (old_winds, - scm_ilength (old_winds)); SCM_REDEFER_INTS; -#ifdef DEBUG_EXTENSIONS scm_last_debug_frame = SCM_DFRAME (old_rootcont); -#endif scm_rootcont = old_rootcont; SCM_REALLOW_INTS; -- cgit v1.2.3