diff options
| author | Artur Bergman <sky@nanisky.com> | 2003-04-13 19:26:46 +0000 |
|---|---|---|
| committer | Artur Bergman <sky@nanisky.com> | 2003-04-13 19:26:46 +0000 |
| commit | 47cb5ff94030e4ad02be93d8c9632645ac553a43 (patch) | |
| tree | 16748f0ac94120a42ff96d986ee114e6cd887d3d /ext | |
| parent | b0cd0593e12bb665e072c6e288a3346d6ef18489 (diff) | |
| download | perl-47cb5ff94030e4ad02be93d8c9632645ac553a43.tar.gz | |
Fix bug #16253, use all the CPU that we can :-)
p4raw-id: //depot/perl@19201
Diffstat (limited to 'ext')
| -rwxr-xr-x | ext/threads/threads.xs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 0110724ab4..1ad12a6f43 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -494,6 +494,7 @@ 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 + pthread_attr_setscope( &attr, PTHREAD_SCOPE_SYSTEM ); pthread_create( &thread->thr, &attr, Perl_ithread_run, (void *)thread); #endif } |