summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorDan Sugalski <dan@sidhe.org>2000-10-25 09:36:35 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2000-10-25 20:14:30 +0000
commitad65f0b0997dbcb712dedab351b22f392b8b37d0 (patch)
tree8465bcaf8dd18dc7ab182f0ea73e93049e9c1910 /perl.c
parent4d8f5870a2462f70b365f4b15ae1142ffbb3358f (diff)
downloadperl-ad65f0b0997dbcb712dedab351b22f392b8b37d0.tar.gz
Add non-blocking thread doneness checking
Message-Id: <5.0.0.25.0.20001025133504.01ef1e20@24.8.96.48> plus regen global.sym. p4raw-id: //depot/perl@7442
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index 3d874ca9bd..b65bdb91a8 100644
--- a/perl.c
+++ b/perl.c
@@ -3637,6 +3637,7 @@ S_init_main_thread(pTHX)
thr->tid = 0;
thr->next = thr;
thr->prev = thr;
+ thr->thr_done = 0;
MUTEX_UNLOCK(&PL_threads_mutex);
#ifdef HAVE_THREAD_INTERN