This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Adjust test count for 5.8.x
authorNicholas Clark <nick@ccl4.org>
Wed, 21 Mar 2007 22:59:47 +0000 (22:59 +0000)
committerNicholas Clark <nick@ccl4.org>
Wed, 21 Mar 2007 22:59:47 +0000 (22:59 +0000)
p4raw-id: //depot/perl@30673

ext/B/t/concise-xs.t

index ba9a1ed..b19cf59 100644 (file)
@@ -119,9 +119,9 @@ use Test::More tests => ( # per-pkg tests (function ct + require_ok)
                          40 + 16       # Data::Dumper, Digest::MD5
                          + 517 + 239   # B::Deparse, B
                          + 595 + 190   # POSIX, IO::Socket
                          40 + 16       # Data::Dumper, Digest::MD5
                          + 517 + 239   # B::Deparse, B
                          + 595 + 190   # POSIX, IO::Socket
-                         + 345 * ($] > 5.009)
+                         + 323 * ($] > 5.009)
                          + 17 * ($] >= 5.009003)
                          + 17 * ($] >= 5.009003)
-                         - 365);       # fudge
+                         - 343);       # fudge
 
 require_ok("B::Concise");
 
 
 require_ok("B::Concise");