summaryrefslogtreecommitdiff
path: root/libguile/root.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2003-04-20 07:19:38 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2003-04-20 07:19:38 +0000
commitd0f6ceb84f26b033d6f1ac8bbc2acf81efc29f22 (patch)
tree049594205b5cdd419c32f06af43ec6c3382ef85c /libguile/root.c
parent1ac61c2b50fa64ffc7d9aa4558aecceb9f980640 (diff)
downloadguile-d0f6ceb84f26b033d6f1ac8bbc2acf81efc29f22.tar.gz
* Removed uses of DEBUG_EXTENSIONS and DYNAMIC_LINKING to
fix compile errors with --disable-deprecated.
Diffstat (limited to 'libguile/root.c')
-rw-r--r--libguile/root.c6
1 files changed, 0 insertions, 6 deletions
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;