diff options
| author | Craig A. Berry <craigberry@mac.com> | 2003-05-18 18:02:07 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-05-19 04:30:01 +0000 |
| commit | 19a077f678840021ce79e076d77b5f912feb3f1f (patch) | |
| tree | 9067e124ebe297f0778e3e521e5774b26c95e66e /ext/threads | |
| parent | fcc05d01c240ec29422ab0ec7d098141519ca384 (diff) | |
| download | perl-19a077f678840021ce79e076d77b5f912feb3f1f.tar.gz | |
Based on
Subject: [PATCH threads.xs] no system scope on VMS
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <3EC8573F.6050005@mac.com>
but instead go for #ifdef PTHREAD_SCOPE_SYSTEM.
p4raw-id: //depot/perl@19560
Diffstat (limited to 'ext/threads')
| -rwxr-xr-x | ext/threads/threads.xs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 83f9e89dfe..580f699311 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -506,7 +506,9 @@ Perl_ithread_create(pTHX_ SV *obj, char* classname, SV* init_function, SV* param #ifdef OLD_PTHREADS_API pthread_create( &thread->thr, attr, Perl_ithread_run, (void *)thread); #else +# ifdef PTHREAD_SCOPE_SYSTEM pthread_attr_setscope( &attr, PTHREAD_SCOPE_SYSTEM ); +# endif pthread_create( &thread->thr, &attr, Perl_ithread_run, (void *)thread); #endif } |