Hello everybody.

I've managed to build Perl 5.8.0 without errors, after having obtained a recent 
version of MMK, in order to overcome the problems with ENCODE.C (as investigated by 
Craig Berry/Jordan Henderson in 
http://www.xray.mpe.mpg.de/mailing-lists/vmsperl/2002-08/msg00028.html etc).

I now have some testing problems:

ext/Cwd/t/cwd........................FAILED at test 9
lib/AutoSplit........................FAILED at test 2
lib/File/Spec/t/rel2abs2rel..........FAILED at test 4
lib/vmsish...........................FAILED at test 22

BUT...

The rel2abs2rel problem goes away, if the test is run having set a default like

    DKA200:[USERS.JESPER.PERL5.PERL-5_8_0]
and not
    USERS_ROOT:[JESPER.PERL5.PERL-5_8_0]
where
    "USERS_ROOT" = "DKA200:[USERS.]" (LNM$SYSTEM_TABLE)


When running the cwd test as follows:

$ @[.VMS]TEST .EXE "" "-v" [-.ext.CWD.t]CWD.T

I get

[snip]
1..16
ok 1 - main->can(...)
ok 2 - chdir() not exported by default
ok 3 -   nor abs_path()
ok 4 -   nor fast_abs_path()
# native pwd = 'SHOW DEFAULT'
ok 5 - cwd()
ok 6 - getcwd()
ok 7 - fastcwd()
ok 8 - fastgetcwd()
mkdir _ptrslt_/_path_/_to_/_a_/_dir_: no such file or directory at [-.ext.cwd.t]cwd.t 
line 89
# Looks like you planned 16 tests but only ran 8.
# Looks like your test died just after 8.
EXT/CWD/T/CWD....FAILED at test 9
[snip]

However, if I run it as shown below:

$ def perl_root DKA200:[USERS.JESPER.PERL5.PERL-5_8_0.]/trans=conc
$ set def perl_root:[000000]
$ perl [ext.cwd.t]cwd.t

I get:

1..16
ok 1 - main->can(...)
ok 2 - chdir() not exported by default
ok 3 -   nor abs_path()
ok 4 -   nor fast_abs_path()
# native pwd = 'SHOW DEFAULT'
ok 5 - cwd()
ok 6 - getcwd()
ok 7 - fastcwd()
ok 8 - fastgetcwd()
ok 9 - chdir() + cwd()
ok 10 -         + getcwd()
ok 11 -         + fastcwd()
ok 12 -         + fastgetcwd()
ok 13 - Cwd::chdir() updates $ENV{PWD}
#PERL_ROOT:[000000.T._PTRSLT_._PATH_._TO_._A_]
#PERL_ROOT:[000000.T._PTRSLT_._PATH_._TO_]
#PERL_ROOT:[000000.T._PTRSLT_._PATH_]
#PERL_ROOT:[000000.T._PTRSLT_]
#PERL_ROOT:[000000.T]
ok 14
ok 15 # skip no symlinks on this platform
ok 16 # skip no symlinks on this platform

Apparently, whatever happens in

$ @[.VMS]TEST .EXE "" "-v" [-.ext.CWD.t]CWD.T

in some cases disturbs the test execution.


When running

$ @[.VMS]TEST .EXE "" "-v" [-.ext.CWD.t]CWD.T

I get

1..58
ok 1 - AutoSplit loaded
# command: dka200:[users.][jesper.perl5.perl-5_8_0.t]perl.;1 "-I../lib" -e "use
AutoSplit; autosplit (qw([.auto-3389]A0_3389splittest.pm auto-3389/auto))"
mkdir auto-3389/auto/Yet/Another/AutoSplit/: no such file or directory at ../lib
/AutoSplit.pm line 328
Exit status 1024 from running: >>dka200:[users.][jesper.perl5.perl-5_8_0.t]perl.
;1 "-I../lib" -e "use AutoSplit; autosplit (qw([.auto-3389]A0_3389splittest.pm a
uto-3389/auto))"<< at [-.lib]autosplit.t line 71.
not ok 2 - Output from autosplit()ing tests from the end of the AutoSplit module
..
LIB/AUTOSPLIT....FAILED at test 2

Similarly, when running AutoSplit as follows:

$ def perl_root DKA200:[USERS.JESPER.PERL5.PERL-5_8_0.]/trans=conc
$ set def perl_root:[000000]
$ perl [LIB]AUTOSPLIT.T
[major snippage]

it executes all tests successfully.

When running

$ @[.VMS]TEST .EXE "" "-v" [-.LIB]VMSISH.T

I get

[snip]
ok 18 - croak, vmsish hushed, DCL error message check
ok 19 - vmsish ERR exit, vmsish hushed at runtime, DCL error message check
ok 20 - compile ERR exit, vmsish hushed, DCL error message check
ok 21 - use vmsish qw(time)
not ok 22 - (time) UTC:1030397680 VMS:1030397680
LIB/VMSISH....FAILED at test 22
[snip]

For this test, it does not help to run it outside the [.vms]test.com environment - I 
get the following:

$ perl [LIB]vmsish.t

[snip]
ok 18 - croak, vmsish hushed, DCL error message check
ok 19 - vmsish ERR exit, vmsish hushed at runtime, DCL error message check
ok 20 - compile ERR exit, vmsish hushed, DCL error message check
ok 21 - use vmsish qw(time)
not ok 22 - (time) UTC:1030397779 VMS:1030397779
# Failed at [lib]vmsish.t line 133
not ok 23 - (localtime)
# Failed at [lib]vmsish.t line 139
# UTC: 19 36 23 26 7 102 1 237 1
# VMS: 19 36 23 26 7 102 1 237 1
not ok 24 - (gmtime)
# Failed at [lib]vmsish.t line 146
# UTC: 19 36 21 26 7 102 1 237 0
# VMS: 19 36 21 26 7 102 1 237 0
not ok 25 - (stat) UTC: 1022943813  VMS: 1022943813
# Failed at [lib]vmsish.t line 149


As usual:

$ cc/version
Compaq C V6.2-008 on OpenVMS Alpha V7.1-1H2

$ mmk/ident
%MMK-I-IDENT, this is the MadGoat Make Utility V3.9-3
-MMK-I-COPYRIGHT, Copyright � 1992-2002, MadGoat Software.  All Rights Reserved.

$ sh log perl_root
   "PERL_ROOT" = "DKA200:[USERS.JESPER.PERL5.PERL-5_8_0.]" (LNM$PROCESS_TABLE)
   "PERL_ROOT" = "DKA200:[USERS.JESPER.PERL5_005_03_ROOT.]" (LNM$SYSTEM_TABLE)
$ perl "-V"
Summary of my perl5 (revision 5.0 version 8 subversion 0) configuration:
  Platform:
    osname=VMS, osvers=V7.1-1H2, archname=VMS_AXP
    uname='VMS ngfa V7.1-1H2 DEC 3000 Model 400'
    config_args=''
    hint=none, useposix=false, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=define d_sfio=undef uselargefiles=undef usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
    usemymalloc=undef, bincompat5005=undef
  Compiler:
    cc='CC/DECC', ccflags ='/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj 
/NOANSI_ALIAS',
    optimize='/NoList',
    cppflags='undef'
    ccversion='60290008', gccversion='', gccosandvers='undef'
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='int', lseeksize=4
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='Link', ldflags ='/NoTrace/NoMap'
    libpth=/sys$share /sys$library
    libs= 
    perllibs= 
    libc=(DECCRTL), so=exe, useshrplib=undef, libperl=undef
    gnulibc_version='undef'
  Dynamic Linking:
    dlsrc=dl_vms.c, dlext=exe, d_dlsymun=undef, ccdlflags=''
    cccdlflags='', lddlflags='/Share'


Characteristics of this PERLSHR image: 
  Compile-time options: DEBUGGING
  Built under VMS
  Compiled at Aug 25 2002 20:31:02
  %ENV:
    PERL553_SRC="DKA200:[USERS.JESPER.PERL5.PERL5_005_03.]"
    PERL560_SRC="DKA200:[USERS.JESPER.PERL5.PERL-5_6_0.]"
    PERL580_SRC="DKA200:[USERS.JESPER.PERL5.PERL-5_8_0.]"
    PERLSHR="PERL_ROOT:[000000]PERLSHR.EXE"
    PERL_ROOT="DKA200:[USERS.JESPER.PERL5.PERL-5_8_0.]"
    PERL_SRC="DKA200:[USERS.JESPER.PERL5.PERL5_005_03.]"
  @INC:
    perl_root:[lib.VMS_AXP.5_8_0]
    perl_root:[lib]
    perl_root:[lib.site_perl.VMS_AXP]
    perl_root:[lib.site_perl]
    /perl_root/lib/site_perl
    .


It appears, that two of the four problems are somehow caused by the environment 
established by @[.vms]test.com - the other two seem rather minor. I wonder: Should I 
be happy and simply install the thing? I'm very tempted.

    Best regards
    Jesper Naur


Reply via email to