[Openmcl-cvs-notifications] r14124 - /trunk/source/lisp-kernel/ppc-exceptions.c
gb at clozure.com
gb at clozure.com
Thu Aug 5 08:17:09 CDT 2010
Author: gb
Date: Thu Aug 5 08:17:09 2010
New Revision: 14124
Log:
extra arg to install_signal_handler; ignored on PPC.
Modified:
trunk/source/lisp-kernel/ppc-exceptions.c
Modified: trunk/source/lisp-kernel/ppc-exceptions.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lisp-kernel/ppc-exceptions.c (original)
+++ trunk/source/lisp-kernel/ppc-exceptions.c Thu Aug 5 08:17:09 2010
@@ -2208,7 +2208,7 @@
=
=
void
-install_signal_handler(int signo, void *handler, Boolean system)
+install_signal_handler(int signo, void *handler, Boolean system, Boolean o=
n_altstack)
{
struct sigaction sa;
=
@@ -2248,17 +2248,17 @@
;
if (install_signal_handlers_for_exceptions) {
extern int no_sigtrap;
- install_signal_handler(SIGILL, (void *)signal_handler, true);
+ install_signal_handler(SIGILL, (void *)signal_handler, true, false);
if (no_sigtrap !=3D 1) {
- install_signal_handler(SIGTRAP, (void *)signal_handler, true);
- }
- install_signal_handler(SIGBUS, (void *)signal_handler, true);
- install_signal_handler(SIGSEGV, (void *)signal_handler, true);
- install_signal_handler(SIGFPE, (void *)signal_handler, true);
+ install_signal_handler(SIGTRAP, (void *)signal_handler, true, false);
+ }
+ install_signal_handler(SIGBUS, (void *)signal_handler, true, false);
+ install_signal_handler(SIGSEGV, (void *)signal_handler, true, false);
+ install_signal_handler(SIGFPE, (void *)signal_handler, true, false);
}
=
install_signal_handler(SIGNAL_FOR_PROCESS_INTERRUPT,
- (void *)interrupt_handler, true);
+ (void *)interrupt_handler, true, false);
signal(SIGPIPE, SIG_IGN);
}
=
@@ -2297,8 +2297,8 @@
thread_suspend_signal =3D SIG_SUSPEND_THREAD;
thread_kill_signal =3D SIG_KILL_THREAD;
=
- install_signal_handler(thread_suspend_signal, (void *) suspend_resume_ha=
ndler, true);
- install_signal_handler(thread_kill_signal, (void *)thread_kill_handler, =
true);
+ install_signal_handler(thread_suspend_signal, (void *) suspend_resume_ha=
ndler, true, false);
+ install_signal_handler(thread_kill_signal, (void *)thread_kill_handler, =
true, false);
}
=
=
More information about the Openmcl-cvs-notifications
mailing list