]> git.vpit.fr Git - perl/modules/Scope-Upper.git/commitdiff
Harden t/69-uplevel-threads.t against stray exits
authorVincent Pit <vince@profvince.com>
Mon, 3 Aug 2015 17:06:18 +0000 (14:06 -0300)
committerVincent Pit <vince@profvince.com>
Mon, 3 Aug 2015 21:30:21 +0000 (18:30 -0300)
t/69-uplevel-threads.t

index 11255f7a2050993dea7c845488038c0e32138fff..775add33847963c257f367df82d5d04774ce84f5 100644 (file)
@@ -68,4 +68,4 @@ my @threads = map spawn(\&up1), 1 .. 30;
 
 $_->join for @threads;
 
-done_testing(3 + scalar(@threads) * 3);
+done_testing;