This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
5.8's B.xs exports AVf_REAL, so need to jiggle the test count by 1.
authorNicholas Clark <nick@ccl4.org>
Tue, 13 Mar 2007 17:35:05 +0000 (17:35 +0000)
committerNicholas Clark <nick@ccl4.org>
Tue, 13 Mar 2007 17:35:05 +0000 (17:35 +0000)
(And then merge the difference back into blead)

p4raw-id: //depot/perl@30563

ext/B/t/concise-xs.t

index 3ce4625..ba9a1ed 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
-                         + 346 * ($] > 5.009)
+                         + 345 * ($] > 5.009)
                          + 17 * ($] >= 5.009003)
-                         - 366);       # fudge
+                         - 365);       # fudge
 
 require_ok("B::Concise");