This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Bogus skip count.
authorJarkko Hietaniemi <jhi@iki.fi>
Fri, 12 Aug 2016 21:30:25 +0000 (17:30 -0400)
committerJarkko Hietaniemi <jhi@iki.fi>
Sat, 13 Aug 2016 02:35:25 +0000 (22:35 -0400)
Didn't break anything but still bogus.

t/op/sprintf2.t

index 52bb23c..1dcfa93 100644 (file)
@@ -851,7 +851,7 @@ SKIP: {
 # x86 80-bit long-double tests for
 # rt.perl.org #128843, #128888, #128889, #128890, #128893
 SKIP: {
-    skip("non-80-bit-long-double", scalar @subnormals + 34)
+    skip("non-80-bit-long-double", 7)
         unless ($Config{uselongdouble} &&
                ($Config{nvsize} == 16 || $Config{nvsize} == 12) &&
                ($Config{longdblkind} == 3 ||