diff options
| author | Coral <coral@moonlight.crystalflame.net> | 2001-07-16 07:25:19 -0700 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-07-17 07:50:12 +0000 |
| commit | 8ff9412f9ef1dbdabee4f0993653e1446d7a88c8 (patch) | |
| tree | 7055b22cc4ec19290144d90c64493350e760a8ed /thread.h | |
| parent | 11946041b5e3fb6ece0f34961bb0290ea36d7d61 (diff) | |
| download | perl-8ff9412f9ef1dbdabee4f0993653e1446d7a88c8.tar.gz | |
fix PTHREAD_ATFORK croaking too early, too often
Message-Id: <200107162125.f6GLPJ345261@moonlight.crystalflame.net>
p4raw-id: //depot/perl@11392
Diffstat (limited to 'thread.h')
| -rw-r--r-- | thread.h | 13 |
1 files changed, 2 insertions, 11 deletions
@@ -310,13 +310,8 @@ void Perl_atfork_unlock(void); # define PTHREAD_ATFORK(prepare,parent,child) \ pthread_atfork(prepare,parent,child) # else -# ifdef HAS_FORK -# define PTHREAD_ATFORK(prepare,parent,child) \ - Perl_croak(aTHX_ "No pthread_atfork() -- fork() too unsafe"); -# else -# define PTHREAD_ATFORK(prepare,parent,child) \ - NOOP -# endif +# define PTHREAD_ATFORK(prepare,parent,child) \ + NOOP # endif #endif @@ -474,7 +469,3 @@ typedef struct condpair { #ifndef INIT_THREADS # define INIT_THREADS NOOP #endif - -#ifndef PTHREAD_ATFORK -# define PTHREAD_ATFORK(prepare,parent,child) NOOP -#endif |