summaryrefslogtreecommitdiff
path: root/libguile/gc-mark.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2004-09-20 21:47:09 +0000
committerMarius Vollmer <mvo@zagadka.de>2004-09-20 21:47:09 +0000
commitb17810e6f0c59baea2a88bc497c80852ed757ca1 (patch)
tree1e1342f17a106f2eae14d1921f6ca55865b16ed6 /libguile/gc-mark.c
parent591527227078eb08eae923f952d319a35038b970 (diff)
downloadguile-b17810e6f0c59baea2a88bc497c80852ed757ca1.tar.gz
(SCM_MARK_BACKING_STORE): Removed, it was unused.
Diffstat (limited to 'libguile/gc-mark.c')
-rw-r--r--libguile/gc-mark.c16
1 files changed, 0 insertions, 16 deletions
diff --git a/libguile/gc-mark.c b/libguile/gc-mark.c
index 8c5991fd2..1aa036b7a 100644
--- a/libguile/gc-mark.c
+++ b/libguile/gc-mark.c
@@ -63,22 +63,6 @@ extern unsigned long * __libc_ia64_register_backing_store_base;
#include <unistd.h>
#endif
-#ifdef __ia64__
-# define SCM_MARK_BACKING_STORE() do { \
- ucontext_t ctx; \
- SCM_STACKITEM * top, * bot; \
- getcontext (&ctx); \
- scm_mark_locations ((SCM_STACKITEM *) &ctx.uc_mcontext, \
- ((size_t) (sizeof (SCM_STACKITEM) - 1 + sizeof ctx.uc_mcontext) \
- / sizeof (SCM_STACKITEM))); \
- bot = (SCM_STACKITEM *) __libc_ia64_register_backing_store_base; \
- top = (SCM_STACKITEM *) ctx.uc_mcontext.sc_ar_bsp; \
- scm_mark_locations (bot, top - bot); } while (0)
-#else
-# define SCM_MARK_BACKING_STORE()
-#endif
-
-
/*
Entry point for this file.
*/