diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2002-07-18 18:23:35 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2002-07-18 18:23:35 +0000 |
commit | 39f1703b298e7cfad95b26600223fa7595098e73 (patch) | |
tree | 543e60592728a09dbc15f10941dc27d82f7e452c /util.c | |
parent | 5c4d99470a2052457ff93a178c3cf9fd15239160 (diff) | |
download | perl-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.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -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; |