Ok, I installed ZLIB 2.0 into my blead 25366 tree and ran all the tests that I found resulting in the following:

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.

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


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.

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?


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.

-John
[EMAIL PROTECTED]
Personal Opinion Only

Reply via email to