X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F59-unwind-threads.t;h=56457670f74be22c6864d1814ab6346c36688ed9;hb=387cbfa74da2ca6fa54a9800a9223982d21be6af;hp=5780fb05f151e1c77a25ed9d74dbdb9fa058399a;hpb=a26097967f907b721862e434af302d0bfb6b3e97;p=perl%2Fmodules%2FScope-Upper.git

diff --git a/t/59-unwind-threads.t b/t/59-unwind-threads.t
index 5780fb0..5645767 100644
--- a/t/59-unwind-threads.t
+++ b/t/59-unwind-threads.t
@@ -41,4 +41,6 @@ my @threads = map spawn(\&up1), 1 .. 30;
 
 $_->join for @threads;
 
-done_testing(scalar @threads);
+pass 'done';
+
+done_testing(scalar(@threads) + 1);