From: Jarkko Hietaniemi Date: Wed, 2 Apr 2003 19:37:59 +0000 (+0000) Subject: Make at least the thread count make sense. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3c42a367e53aec886fda59abee7d5b4b2e100590;p=p5sagit%2Fp5-mst-13.2.git Make at least the thread count make sense. p4raw-id: //depot/perl@19138 --- diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 00d18ba..0110724 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -160,7 +160,7 @@ Perl_ithread_hook(pTHX) int veto_cleanup = 0; MUTEX_LOCK(&create_destruct_mutex); if (aTHX == PL_curinterp && active_threads != 1) { - Perl_warn(aTHX_ "A thread exited while %" IVdf " other threads were still running", + Perl_warn(aTHX_ "A thread exited while %" IVdf " threads were running", (IV)active_threads); veto_cleanup = 1; }