Thanks John. I've CCed Tom Hughes for the IO:Zlib results. I see that the majority of the failures match those that Abe Timmerman reported earlier today. Apart from running with bleed what else is different between the two versions that could account for the extra failures you are seeing? Is it anything to do with running the VMS C library in UNIX emulation mode that you mentioned?
I also notice that Abe ran with a slightly older version of the new Compress::Zlib library. Don't think that is the problem though. Abe, if you get a chance, can you try with the latest snapshot of Compress::Zlib, version 2.000_02, please? http://search.cpan.org/CPAN/authors/id/P/PM/PMQS/Compress-Zlib-2.000_02.tar. gz Comments online for the extra test failing for you. See my reply to Abe for the others. > > lib/IO/Zlib/t/basic.t 15 of 15 ok. > > lib/IO/Zlib/t/external.t > 1..0 # Skip: no /usr/bin/gzip > > If the GNV package is installed on VMS, then gzip is > available at /bin/gzip. As I had nothing in /usr, I > set up a logical name so that /usr/bin/gzip should > find a gzip. This test still produced the same output. > > Also gzip may (or may not) be present anywhere on the > system with a foreign command (shell alias) or the > DCL$PATH search list used to find it. > > lib/IO/Zlib/t/getc.t 10 of 10 ok > lib/IO/Zlib/t/getline.t 19 of 19 ok > lib/IO/Zlib/t/import.t 1 of 1 ok > lib/IO/Zlib/t/large.t 7 of 7 ok > lib/IO/Zlib/t/tied.t 11 of 11 ok > lib/IO/Zlib/t/uncomp1.t 10 of 10 ok > lib/IO/Zlib/t/uncomp2.t 10 of 10 ok . > > ext/Compress/Zlib/t/01version.t 2 of 2 ok > ext/Compress/Zlib/t/02zlib.t 242 of 242 ok > > I needed to and a "-I[-.ext.compress.zlib.t] for > the test to find MyTestUtils.pm for 02zlib.t. > After having to do the same for 03zlib-v1.t, > I am assuming that all tests need it. This > likely means that I put the file in the wrong > place when I merged zlib 2 with blead. I recon so. > ext/Compress/Zlib/t/03zlib-v1.t 351 of 351 ok > > ext/Compress/Zlib/t/04def.t fails on test 102 and dies. > not ok 102 - create IO::Gzip > # Failed test ([-.ext.compress.zlib.t]04def.t at line 322) > Can't call method "fileno" on an undefined value at > [-.ext.compress.zlib.t]04def.t line 324. > # Looks like you planned 1781 tests but only ran 102. > # Looks like your test died just after 102. > %SYSTEM-F-ABORT, abort Not sure why this is failing for you but passing for Abe. > > ext/Compress/Zlib/t/05examples.t > not ok 21 - exit status is 0 > # Failed test ([-.ext.compress.zlib.t]05examples.t at line 152) > # got: '512' > # expected: '0' > not ok 22 - no stderr > # Failed test ([-.ext.compress.zlib.t]05examples.t at line 153) > # got: '71' > # expected: '0' > ok 23 - gzcat > ok 24 - exit status is 0 > not ok 25 - content is ok > # Failed test ([-.ext.compress.zlib.t]05examples.t at line 158) > # got: '%RMS-E-FNF, file not found > # ' > # expected: 'helloext/Compress/Zlib/t/06gzsetp.t > <snip> > # Looks like you failed 3 tests of 25. Again not sure why it fails for you but passes for Abe. > ext/Compress/Zlib/t/07bufsize.t 288 of 288 pass. > ext/Compress/Zlib/t/08encoding.t 16 of 16 pass. > ext/Compress/Zlib/t/09gziphdr.t 790 of 790 pass. > ext/Compress/Zlib/t/10defhdr.t 595 of 595 pass. > ext/Compress/Zlib/t/11truncate.t 2374 of 2374 pass. > ext/Compress/Zlib/t/12any.t 63 of 63 pass. > ext/Compress/Zlib/t/13prime.t 10612 of 10612 pass. > > > ext/Compress/Zlib/t/14gzopen.t fails 178, 179, 180. > not ok 178 - input file not writable > # Failed test ([-.ext.compress.zlib.t]14gzopen.t at line 477) > not ok 179 - gzopen returns undef > # Failed test ([-.ext.compress.zlib.t]14gzopen.t at line 480) > not ok 180 - gzerrno ok > # Failed test ([-.ext.compress.zlib.t]14gzopen.t at line 481) > # gzerrno 0 > > > ext/Compress/Zlib/t/15multi.t 575 of 575 pass. > > > ext/Compress/Zlib/t/16oneshot.t fails at 1381 and dies. > ok 1381 - IO::Gzip::gzip - File Glob to Hash Ref > glob failed (can't start child: invalid argument) at > /project_root/perl-blead/lib/Compress/Zlib/Common.pm line 302. > legal or die??? at /project_root/perl-blead/lib/Compress/Zlib/Common.pm > line > 307. > # Looks like you planned 2544 tests but only ran 1381. > # Looks like your test died just after 1381. > > ext/Compress/Zlib/t/17isize.t fails at 25. > ok 25 - Created IO::Gunzip object > Out of memory! > # Looks like you planned 76 tests but only ran 25. > %SYSTEM-F-ABORT, abort > > Accounting showed that the process hit 872 Megabytes. > How much virtual memory is needed for this test? Stacks -- I wouldn't bother with this test. In standalone mode this test does not get run by default. It is testing that it is possible to create gzip files > 2^32 bytes long. If this version of Perl ever gets integrated into the core this test will not be run by default. > > ext/Compress/Zlib/t/18lvalue.t 10 of 10 pass. > ext/Compress/Zlib/t/19destroy.t 23 of 23 pass. > ext/Compress/Zlib/t/20tied.t 731 of 732 pass. > ext/Compress/Zlib/t/21newtied.t 242 of 242 pass. > > ext/Compress/Zlib/t/22merge.t Dies on test 151. > ok 150 - Destination is ok > Cannot open abcde.out: file currently locked by another user > # Looks like you planned 490 tests but only ran 150. > # Looks like your test died just after 150. > > ext/Compress/Zlib/t/23misc.t 29 of 29 pass. > > ext/Compress/Zlib/t/99pod.t skipped. > 1..0 # Skip Test::Pod 1.00 required for testing POD > > ext/Compress/Zlib/t/globmapper.t > not ok 31 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 84) > # Structures begin differing at: > # $got->[0][0] = 'td/abc1.' > # $expected->[0][0] = 'td/abc1' > not ok 32 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 89) > # Structures begin differing at: > # $got->{td/abc3} = Does not exist > # $expected->{td/abc3} = 'td/abc3.X' > not ok 48 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 172) > # Structures begin differing at: > # $got->[0][0] = 'td/abc1.' > # $expected->[0][0] = 'td/abc1' > not ok 52 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 193) > # Structures begin differing at: > # $got->[0][0] = 'td/abc1.' > # $expected->[0][0] = 'td/abc1' > not ok 56 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 215) > # Structures begin differing at: > # $got->[0][0] = 'td/abc1.' > # $expected->[0][0] = 'td/abc1' > not ok 60 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 234) > # Structures begin differing at: > # $got->[0][0] = 'td/abc.' > # $expected->[0][0] = 'td/abc' > not ok 61 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 238) > # Structures begin differing at: > # $got->{td/abc} = Does not exist > # $expected->{td/abc} = 'td/abc.X' > not ok 68 - got mapping > # Failed test ([-.ext.compress.zlib.t]globmapper.t at line 279) > # Structures begin differing at: > # $got->[0][0] = 'td/abc1.' > # $expected->[0][0] = 'td/abc1' > # Looks like you failed 8 tests of 68. > %SYSTEM-F-ABORT, abort > > Of this script, tests 31,48,52,56,60,68 are expected behavior > on VMS when the C library is not in a UNIX emulation mode. > I do not have blead Perl able to fully work in this mode yet.
