5.8.2 build problem with long directory spec

[Odd Gripenstam]

Hello all,

I searched the list archive without finding anything similar, so I thought 
this might be of interest.

When I build 5.8.2 from my home directory everything is OK except for the 
(still ?) expected time zone problem:

$ sh def
 USER:[GRIPENSTAM.PERL-5_8_2]
$ sh log user
  "USER" = "$1$DGA25:[USER.]" (LNM$SYSTEM_TABLE)
lib/vmsish...........................FAILED at test 25

When I build from where we had planned to keep the sources I get other 
problems:

The directory is $1$DGA20:[LAYERED.PERL.DISTRIBUTIONS.PERL-5_8_2] so I 
define a rooted logical name called PERLSRC per the readme file. This gives 
me an ACCVIO when building B.
When I define a logical name called P the build is OK but another test 
fails:

t/run/switchpx.......................FAILED at test 0

Running that test manually gives an error message that indicates that the 
long directory name is a problem again.

Here is an abbreviated listing of my build attempts:

$ sh log perlsrc/ful
  "PERLSRC" [super] = "$1$DGA20:[LAYERED.PERL.DISTRIBUTIONS.PERL-5_8_2.]" 
[concealed,terminal] (LNM$PROCESS_TABLE)
$ set def perlsrc:[000000]
$ sho def
 PERLSRC:[000000]
$ @configure -"des"

...

Checking for dangerous pre-existing global symbols and logical names.
The perl_setup.com file is now being written...
   PERLSRC:[000000]PERL_SETUP.COM;6
In order to build perl5 you must now issue the command:

MMS

$ mms
...
       Making B (dynamic)
%MMS-F-ABORT, For target DYNEXT, CLI returned abort status: %X1000000C.
$ sh log/ful p
  "P" [super] = "$1$DGA20:[LAYERED.PERL.DISTRIBUTIONS.PERL-5_8_2.]" 
[concealed,terminal] (LNM$PROCESS_TABLE)
$ set def p:
$ sh def
 P:[000000]
$ mms realclean
...
$ @configure -"des"
...
The perl_setup.com file is now being written...
   P:[000000]PERL_SETUP.COM;7

In order to build perl5 you must now issue the command:

MMS

$ mms
...
       Making B (dynamic)
Writing Descrip.MMS for B::C
Writing Descrip.MMS for B
...
Everything is up to date. 'MMS test' to run test suite.
$ mms test
...
t/run/switchpx.......................FAILED at test 0
...
lib/vmsish...........................FAILED at test 25
...
Failed 2 test scripts out of 741, 99.73% okay.


$ mc [--]perl "-Px" SWITCHPX.AUX
%DCL-W-TKNOVF, command element is too long - shorten
\$1$DGA20:[LAYERED.PERL.DISTRIBUTIONS.PERL-5_8_2.][000000]PERL.EXE;1 
-NE"(1../^
#!.*perl/i)|/^\s*#(?!\s*((ifn?|un)def|(el|end)?if|define|include|else|error|prag
ma)\b)/||!($|=1)||print" SWITCHPX.AUX | 
CC/DECC/NOOBJ/COMMENTS=AS_IS/PREPROCESS=
SYS$OUTPUT SYS$
Warning: Use of "-W-TKNOVF" without parentheses is ambiguous at switchpx.aux 
lin
e 1.
Backslash found where operator expected at switchpx.aux line 2, near 
"shorten
\"
       (Do you need to predeclare shorten?)
Scalar found where operator expected at switchpx.aux line 2, near "$1$DGA20"
       (Missing operator before $DGA20?)
Bareword found where operator expected at switchpx.aux line 2, near "]PERL"
       (Missing operator before PERL?)
String found where operator expected at switchpx.aux line 2, near 
"NE"(1../^#!.*
perl/i)|/^\s*#(?!\s*((ifn?|un)def|(el|end)?if|define|include|else|error|pragma)\
b)/||!($|=1)||print""
Bareword found where operator expected at switchpx.aux line 2, near 
""(1../^#!.*
perl/i)|/^\s*#(?!\s*((ifn?|un)def|(el|end)?if|define|include|else|error|pragma)\
b)/||!($|=1)||print" SWITCHPX"
       (Missing operator before SWITCHPX?)
syntax error at switchpx.aux line 1, near "%DCL-W"
syntax error at switchpx.aux line 2, near 
"NE"(1../^#!.*perl/i)|/^\s*#(?!\s*((if
n?|un)def|(el|end)?if|define|include|else|error|pragma)\b)/||!($|=1)||print""
Execution of switchpx.aux aborted due to compilation errors.
%SYSTEM-F-ABORT, abort

$ MMS printconfig

make_cmd='MMS PRINTCONFIG'

Summary of my 'perl5' (version '8' subversion '2') configuration:
 Platform:
   osname='VMS', osvers='V7.3', archname='VMS_AXP'
    uname='VMS xxxx V7.3 COMPAQ AlphaServer DS20E 833 MHz'
    hint='none' d_sigaction='undef'
    static exts=
  Compiler:
    cc='CC/DECC', optimize='/NoList', ld='Link'
    cppflags=
    ccflags ='/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj 
/NOANSI_ALI
AS/float=ieee/ieee=denorm_results'
    ldflags ='/NoTrace/NoMap'
    stdchar='char', d_stdstdio='define', usevfork='true'
    voidflags='15', castflags='0', d_casti32='define', d_castneg='define'
    intsize='4', alignbytes='8', usemymalloc='undef', randbits='31'
  Libraries:
    so='exe'
    libpth='/sys$share /sys$library'
    libs=' '
    libc='(DECCRTL)'
  Dynamic Linking:
    dlsrc='dl_vms.c', dlext='exe', d_dlsymun='undef'
    cccdlflags=, ccdlflags=, lddlflags='/Share'

Since I can build from my home directory this is mostly a FYI.

/Odd

_________________________________________________________________
Help STOP SPAM with the new MSN 8 and get 2 months FREE*  
http://join.msn.com/?page=features/junkmail