--- gforth/engine/signals.c	2012/03/23 19:32:25	1.44
+++ gforth/engine/signals.c	2012/12/31 15:25:19	1.52
@@ -1,6 +1,6 @@
 /* signal handling
 
-  Copyright (C) 1995,1996,1997,1998,2000,2003,2006,2007,2011 Free Software Foundation, Inc.
+  Copyright (C) 1995,1996,1997,1998,2000,2003,2006,2007,2011,2012 Free Software Foundation, Inc.
 
   This file is part of Gforth.
 
@@ -101,12 +101,12 @@ graceful_exit (int sig)
   exit (0x80|sig);
 }
 
-__thread jmp_buf throw_jmp_buf;
+PER_THREAD jmp_buf * throw_jmp_handler;
 
 void throw(int code)
 {
-  debugp(stderr,"\nthrow code %d\n", code);
-  longjmp(throw_jmp_buf,code); /* !! or use siglongjmp ? */
+  debugp(stderr,"\nthrow code %d to %p\n", code, *throw_jmp_handler);
+  longjmp(*throw_jmp_handler,code); /* !! or use siglongjmp ? */
 }
 
 static void 
@@ -142,7 +142,7 @@ signal_throw(int sig)
 static void
 sigaction_throw(int sig, siginfo_t *info, void *_)
 {
-  debugp(stderr,"\nsigaction_throw %d %x %x\n", sig, info, _);
+  debugp(stderr,"\nsigaction_throw %d %p %p\n", sig, info, _);
   signal_throw(sig);
 }
 
@@ -192,26 +192,27 @@ static void fpe_handler(int sig, siginfo
 #define JUSTOVER(addr1,addr2) (((UCell)((addr1)-(addr2)))<SPILLAGE)
 
 #define NEXTPAGE(addr) ((Address)((((UCell)(addr)-1)&-pagesize)+pagesize))
+#define NEXTPAGE2(addr) ((Address)((((UCell)(addr)-1)&-pagesize)+2*pagesize))
+#define NEXTPAGE3(addr) ((Address)((((UCell)(addr)-1)&-pagesize)+3*pagesize))
 
 static void segv_handler(int sig, siginfo_t *info, void *_)
 {
   int code=-9;
   Address addr=info->si_addr;
-  ImageHeader *h=gforth_header;
 
-  debugp(stderr,"\nsegv_handler %d %x %x\n", sig, info, _);
+  debugp(stderr,"\nsegv_handler %d %p %p @%p\n", sig, info, _, addr);
 
-  if (JUSTUNDER(addr, h->data_stack_base))
+  if (JUSTUNDER(addr, NEXTPAGE3(gforth_UP)))
     code=-3;
-  else if (JUSTOVER(addr, NEXTPAGE(h->data_stack_base+h->data_stack_size)))
+  else if (JUSTOVER(addr, NEXTPAGE(gforth_UP->sp0)))
     code=-4;
-  else if (JUSTUNDER(addr, h->return_stack_base))
+  else if (JUSTUNDER(addr, NEXTPAGE2(gforth_UP->sp0)))
     code=-5;
-  else if (JUSTOVER(addr, NEXTPAGE(h->return_stack_base+h->return_stack_size)))
+  else if (JUSTOVER(addr, NEXTPAGE(gforth_UP->rp0)))
     code=-6;
-  else if (JUSTUNDER(addr, h->fp_stack_base))
+  else if (JUSTUNDER(addr, NEXTPAGE2(gforth_UP->rp0)))
     code=-44;
-  else if (JUSTOVER(addr, NEXTPAGE(h->fp_stack_base+h->fp_stack_size)))
+  else if (JUSTOVER(addr, NEXTPAGE(gforth_UP->fp0)))
     code=-45;
   throw(code);
 }
@@ -416,7 +417,9 @@ void install_signal_handlers(void)
   };
   int i;
   void (*throw_handler)() = die_on_signal ? graceful_exit : signal_throw;
-#ifdef SIGSTKSZ 
+#if 0
+  /* sigaltstack is now called by gforth_stacks() */
+#if defined(SIGSTKSZ)
   stack_t sigstack;
   int sas_retval=-1;
 
@@ -434,6 +437,7 @@ void install_signal_handlers(void)
   debugp(stderr,"sigaltstack: %s\n",strerror(sas_retval));
 #endif
 #endif
+#endif
 
 #define DIM(X)		(sizeof (X) / sizeof *(X))
 /*