diff options
| author | Steve Hay <SteveHay@planit.com> | 2009-06-09 14:47:06 +0100 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2009-06-09 14:47:06 +0100 |
| commit | bcbea5d217c6997d2a140a79bbb1ab98c4acc354 (patch) | |
| tree | 35f879b32b1b6b77f86f182c472d5247891ff68a /ext | |
| parent | fb22f0eaa0d1a411b0a77d70dc8a2f14a42726a2 (diff) | |
| download | perl-bcbea5d217c6997d2a140a79bbb1ab98c4acc354.tar.gz | |
Fix threads build on Win32
Follow-up to 8264cf327251f9724c99b125cc3eea11be9b97c5.
Diffstat (limited to 'ext')
| -rwxr-xr-x | ext/threads/threads.xs | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 7abd0371d1..7d0ad23c31 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -142,7 +142,7 @@ S_block_most_signals(sigset_t *oldmask) return sigprocmask(SIG_BLOCK, &newmask, oldmask); #else return pthread_sigmask(SIG_BLOCK, &newmask, oldmask); -#endif /* WIN32 */ +#endif /* VMS */ } /* Set the signal mask for this thread to newmask */ @@ -153,9 +153,9 @@ S_set_sigmask(sigset_t *newmask) return sigprocmask(SIG_SETMASK, newmask, NULL); #else return pthread_sigmask(SIG_SETMASK, newmask, NULL); -#endif /* WIN32 */ +#endif /* VMS */ } -#endif +#endif /* WIN32 */ /* Used by Perl interpreter for thread context switching */ STATIC void @@ -184,7 +184,9 @@ STATIC void S_ithread_clear(pTHX_ ithread *thread) { PerlInterpreter *interp; +#ifndef WIN32 sigset_t origmask; +#endif assert(((thread->state & PERL_ITHR_FINISHED) && (thread->state & PERL_ITHR_UNCALLABLE)) |