Craig A. Berry wrote:

> Peter,
> 
> I take it this is to prevent the directory not found error from your
> previous posting.  This appears at first glance to be a legitimate

Not only that but basically miniperl.exe would not do anything without
the patch I sent.  After the patch the whole build went to completion.
I was worried that a simple binary logic error had crept in as a typo.
But thanks for confirming that it is my mind that is slipping not Charles
Bailey's fingers :-)

> error status from the call to sys$check_access within cando_by_name.
> Do you happen to know what dirspec it was complaining about?  Hunches
> would include the possibility that do_fileify_dirspec and/or
> do_tovmsspec have changed behavior out from under cando_by_name,
> perhaps giving it a directory name that is not quite what it really
> wants.

I am not sure that it is necessarily a dirspec that is the problem.
To double check things I went back and re extracted the vmsperl_pre56_3
tar ball using the vms qualifier /date=none to be sure that no patched file 
timestamp messed things up and once again, after the single 
s/use_64bitint/use64bitint/ tweak to vms/subconfigure.com I see:

Library/Object/Replace LIBPERL.OLB SOCKADAPT.OBJ, AV.OBJ, DEB.OBJ, DOIO.OBJ, 
DOOP.OBJ, DUMP.OBJ, GLOBALS.OBJ, GV.OBJ, HV.OBJ, MG.OBJ, MINIPERLMAIN.OBJ, OP.OBJ,
PERL.OBJ, PERLIO.OBJ, PERLY.OBJ, PP.OBJ, PP_CTL.OBJ, PP_HOT.OBJ, PP_SYS.OBJ, 
REGCOMP.OBJ, -
REGEXEC.OBJ, RUN.OBJ, SCOPE.OBJ, SV.OBJ, TAINT.OBJ, TOKE.OBJ, UNIVERSAL.OBJ, 
UTF8.OBJ, UTIL.OBJ, VMS.OBJ, XSUTILS.OBJ
Link /NoTrace/NoMap/Trace/Exe=MINIPERL.EXE 
miniperlmain.obj,libperl.olb/Library/
Include=globals  ,[]crtl.opt/Options
Link /NoTrace/NoMap/NoDebug/Trace/NoMap/NoFull/NoCross/Exe=SYS$DISK:[]MINIPERL.EXE 
miniperlmain.obj, libperl.olb/Library/Include=globals ,[]crtl.opt/Options
MCR Sys$Disk:[]miniperl.exe "-I[.lib]" [.VMS]Writemain.pl "DynaLoader Socket"
Fatal VMS error (status=114762) at DKB100:[VMSPERL]VMS.C;1, line 4653.
%RMS-E-DNF, directory not found
-NONAME-W-NOMSG, Message number 00000000
%MMS-F-ABORT, For target PERLMAIN.C, CLI returned abort status: %X0001C04A.
-RMS-E-DNF, directory not found

I can get that to repeat from the command line.  Simple things like 
this work OK:

 $ MCR Sys$Disk:[]miniperl.exe -e "print 'hello'"
 hello

but this does not:

 $ MCR Sys$Disk:[]miniperl.exe "-I[.lib]" [.utils]splain.PL > splain.com
 Fatal VMS error (status=114762) at DKB100:[VMSPERL]VMS.C;1, line 4653.
 %RMS-E-DNF, directory not found
 -NONAME-W-NOMSG, Message number 00000000

Let's see what it is capable of writing:

 $ dir *main.c, splain.com

 Directory DKB100:[VMSPERL]

 MINIPERLMAIN.C;1           3   3-MAR-2000 14:45:54.39
 SPLAIN.COM;1               0   3-MAR-2000 15:24:43.64

 Total of 2 files, 3 blocks.

FWIW dkb100 is a 9 gig drive with 10793412 free blocks (39% full) and I have 
ALL privs (though I am not SYSTEM).

Peter Prymmer

Reply via email to