diff options
Diffstat (limited to 'libguile/gc-mark.c')
-rw-r--r-- | libguile/gc-mark.c | 16 |
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. */ |