[Openmcl-cvs-notifications] r14122 - /trunk/source/lisp-kernel/x86-exceptions.c

gb at clozure.com gb at clozure.com
Thu Aug 5 03:48:55 CDT 2010


Author: gb
Date: Thu Aug  5 03:48:55 2010
New Revision: 14122

Log:
De-pessimize the handling of the on_altstack arg to install_signal_handler(=
).

Modified:
    trunk/source/lisp-kernel/x86-exceptions.c

Modified: trunk/source/lisp-kernel/x86-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/x86-exceptions.c (original)
+++ trunk/source/lisp-kernel/x86-exceptions.c Thu Aug  5 03:48:55 2010
@@ -1871,10 +1871,11 @@
 #endif
   sa.sa_flags =3D =

     0 /* SA_RESTART */
+    | SA_SIGINFO
 #ifdef USE_SIGALTSTACK
-    | on_altstack ? SA_ONSTACK : 0
-#endif
-    | SA_SIGINFO;
+    | (on_altstack ? SA_ONSTACK : 0)
+#endif
+;
 =

   sigaction(signo, &sa, NULL);
   if (system) {



More information about the Openmcl-cvs-notifications mailing list