diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-02 19:37:59 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-02 19:37:59 +0000 |
commit | 3c42a367e53aec886fda59abee7d5b4b2e100590 (patch) | |
tree | 429c4a7388b0b6153fb4dcded10efad0515a41a0 /ext | |
parent | 53bf329c4a7cae809d0c4c820f4ecdeb18754f17 (diff) | |
download | perl-3c42a367e53aec886fda59abee7d5b4b2e100590.tar.gz |
Make at least the thread count make sense.
p4raw-id: //depot/perl@19138
Diffstat (limited to 'ext')
-rwxr-xr-x | ext/threads/threads.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 00d18ba917..0110724ab4 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; } |