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
commit8dcd6f7b32c170bcf62c1187a3413da9a3cdf97a (patch)
tree8465bcaf8dd18dc7ab182f0ea73e93049e9c1910 /perl.c
parent2607bbb4b9732ac518aea01a4967f693eba5de58 (diff)
downloadperl-8dcd6f7b32c170bcf62c1187a3413da9a3cdf97a.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