Change 18200 by pudge@pudge-mobile on 2002/11/28 05:29:12
Yet another approach to signal handling (Matthias)
Affected files ...
.... //depot/macperl/macos/config.h#7 edit
.... //depot/macperl/util.c#12 edit
.... //depot/maint-5.6/macperl/macos/config.h#5 edit
.... //depot/maint-5.6/macperl/util.c#10 edit
.... //depot/maint-5.8/macperl/macos/config.h#2 edit
.... //depot/maint-5.8/macperl/util.c#3 edit
Differences ...
==== //depot/macperl/macos/config.h#7 (text) ====
Index: macperl/macos/config.h
--- macperl/macos/config.h#6~16976~ Sun Jun 2 10:21:28 2002
+++ macperl/macos/config.h Wed Nov 27 21:29:12 2002
@@ -13,6 +13,9 @@
File : config.h - Mac configuration
$Log: config.h,v $
+Revision 1.12 2002/10/30 07:12:31 neeri
+Yet another approach to signal handling
+
Revision 1.11 2002/01/03 21:53:51 neeri
Disable sigaction (MacPerl Bug #470321)
@@ -2241,7 +2244,7 @@
* This symbol, if defined, indicates that Vr4's sigaction() routine
* is available.
*/
-#undef HAS_SIGACTION /**/
+#define HAS_SIGACTION /**/
/* HAS_SIGSETJMP:
* This variable indicates to the C program that the sigsetjmp()
==== //depot/macperl/util.c#12 (text) ====
Index: macperl/util.c
--- macperl/util.c#11~18198~ Wed Nov 27 20:31:03 2002
+++ macperl/util.c Wed Nov 27 21:29:12 2002
@@ -2172,6 +2172,11 @@
#ifndef PERL_MICRO
#ifdef HAS_SIGACTION
+#ifdef MACOS_TRADITIONAL
+/* We don't want restart behavior on MacOS */
+#undef SA_RESTART
+#endif
+
Sighandler_t
Perl_rsignal(pTHX_ int signo, Sighandler_t handler)
{
==== //depot/maint-5.6/macperl/macos/config.h#5 (text) ====
Index: macperl/macos/config.h
--- macperl/macos/config.h#4~14067~ Fri Jan 4 12:19:18 2002
+++ macperl/macos/config.h Wed Nov 27 21:29:12 2002
@@ -13,6 +13,9 @@
File : config.h - Mac configuration
$Log: config.h,v $
+Revision 1.12 2002/10/30 07:12:31 neeri
+Yet another approach to signal handling
+
Revision 1.11 2002/01/03 21:53:51 neeri
Disable sigaction (MacPerl Bug #470321)
@@ -1958,7 +1961,7 @@
* This symbol, if defined, indicates that Vr4's sigaction() routine
* is available.
*/
-#undef HAS_SIGACTION /**/
+#define HAS_SIGACTION /**/
/* HAS_SIGSETJMP:
* This variable indicates to the C program that the sigsetjmp()
==== //depot/maint-5.6/macperl/util.c#10 (text) ====
Index: macperl/util.c
--- macperl/util.c#9~17651~ Mon Jul 22 20:24:35 2002
+++ macperl/util.c Wed Nov 27 21:29:12 2002
@@ -2519,6 +2519,11 @@
#ifdef HAS_SIGACTION
+#ifdef MACOS_TRADITIONAL
+/* We don't want restart behavior on MacOS */
+#undef SA_RESTART
+#endif
+
Sighandler_t
Perl_rsignal(pTHX_ int signo, Sighandler_t handler)
{
==== //depot/maint-5.8/macperl/macos/config.h#2 (text) ====
Index: macperl/macos/config.h
--- macperl/macos/config.h#1~17650~ Mon Jul 22 08:27:48 2002
+++ macperl/macos/config.h Wed Nov 27 21:29:12 2002
@@ -13,6 +13,9 @@
File : config.h - Mac configuration
$Log: config.h,v $
+Revision 1.12 2002/10/30 07:12:31 neeri
+Yet another approach to signal handling
+
Revision 1.11 2002/01/03 21:53:51 neeri
Disable sigaction (MacPerl Bug #470321)
@@ -2241,7 +2244,7 @@
* This symbol, if defined, indicates that Vr4's sigaction() routine
* is available.
*/
-#undef HAS_SIGACTION /**/
+#define HAS_SIGACTION /**/
/* HAS_SIGSETJMP:
* This variable indicates to the C program that the sigsetjmp()
==== //depot/maint-5.8/macperl/util.c#3 (text) ====
Index: macperl/util.c
--- macperl/util.c#2~18199~ Wed Nov 27 21:20:16 2002
+++ macperl/util.c Wed Nov 27 21:29:12 2002
@@ -2346,6 +2346,11 @@
#ifndef PERL_MICRO
#ifdef HAS_SIGACTION
+#ifdef MACOS_TRADITIONAL
+/* We don't want restart behavior on MacOS */
+#undef SA_RESTART
+#endif
+
Sighandler_t
Perl_rsignal(pTHX_ int signo, Sighandler_t handler)
{
End of Patch.
