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