summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2002-07-18 18:23:35 +0000
committerGurusamy Sarathy <gsar@cpan.org>2002-07-18 18:23:35 +0000
commit39f1703b298e7cfad95b26600223fa7595098e73 (patch)
tree543e60592728a09dbc15f10941dc27d82f7e452c /util.c
parent5c4d99470a2052457ff93a178c3cf9fd15239160 (diff)
downloadperl-39f1703b298e7cfad95b26600223fa7595098e73.tar.gz
exclude windows from change#17569 since it "breaks" pseudo-forked
children from signalling their parent via kill(), and therefore socketpair.t failed (windows signal emulation should be thread safe because it is built around a message loop) p4raw-link: @17569 on //depot/perl: a10b1e109d1f901ff6cb267ca6a30834468b37b7 p4raw-id: //depot/perl@17628
Diffstat (limited to 'util.c')
-rw-r--r--util.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/util.c b/util.c
index 7355b96907..dbee23dedc 100644
--- a/util.c
+++ b/util.c
@@ -2427,7 +2427,7 @@ Perl_rsignal_restore(pTHX_ int signo, Sigsave_t *save)
Sighandler_t
Perl_rsignal(pTHX_ int signo, Sighandler_t handler)
{
-#ifdef USE_ITHREADS
+#if defined(USE_ITHREADS) && !defined(WIN32)
/* only "parent" interpreter can diddle signals */
if (PL_curinterp != aTHX)
return SIG_ERR;
@@ -2451,7 +2451,7 @@ Perl_rsignal_state(pTHX_ int signo)
{
Sighandler_t oldsig;
-#ifdef USE_ITHREADS
+#if defined(USE_ITHREADS) && !defined(WIN32)
/* only "parent" interpreter can diddle signals */
if (PL_curinterp != aTHX)
return SIG_ERR;
@@ -2468,7 +2468,7 @@ Perl_rsignal_state(pTHX_ int signo)
int
Perl_rsignal_save(pTHX_ int signo, Sighandler_t handler, Sigsave_t *save)
{
-#ifdef USE_ITHREADS
+#if defined(USE_ITHREADS) && !defined(WIN32)
/* only "parent" interpreter can diddle signals */
if (PL_curinterp != aTHX)
return -1;
@@ -2480,7 +2480,7 @@ Perl_rsignal_save(pTHX_ int signo, Sighandler_t handler, Sigsave_t *save)
int
Perl_rsignal_restore(pTHX_ int signo, Sigsave_t *save)
{
-#ifdef USE_ITHREADS
+#if defined(USE_ITHREADS) && !defined(WIN32)
/* only "parent" interpreter can diddle signals */
if (PL_curinterp != aTHX)
return -1;