From: Vincent Pit <vince@profvince.com>
Date: Sat, 22 Oct 2011 17:37:07 +0000 (+0200)
Subject: t/59-unwind-threads.t should always run at least one test
X-Git-Tag: v0.19~14
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=commitdiff_plain;h=387cbfa74da2ca6fa54a9800a9223982d21be6af

t/59-unwind-threads.t should always run at least one test

No test means failure.
---

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);