Hello,
jesper.naur wrote:
> Hello everybody.
>
> Popular demand has prompted me to publish this version, although I must admit, that
>this
> is perhaps not as recent, as some people might have preferred. But here it is,
>available under
>
> ftp://ftp.sidhe.org/VMSPerl_Community/Tk
>
> filename vmstk003tar.-gz. A README.VMS file contains the instructions necessary for
>the inclusion of my changes and the building of Tk under VMS.
>
> Highlight:
>
> Perl/Tk 800.022 ported to VMS under Perl5.005_03
>
> Before you unpack the entire tar file, you are encouraged to extract the README.VMS
>to take a look
> at the details. Read them carefully, also (and especially) if you plan to move into
>newer Perl
> versions. I would be very interested in hearing about experiences in this direction.
>
> Best regards
> Jesper Naur
>
>
I've started to try to get this to work with 5.6.1 (and did not succeed yet).
Just as a first result -
readme.vms mentions a patch to vms.c which might or might not be necessary with
5.6.1. I've checked the patch against the source distribution and found that it
is already inclucded.
The changes to mm_vms.pm are much more extensive and I did not yet have time to
reconcile them.
Anyhow the process seems to break down much earlier already:
XY:[TK800_022]
$ perl makefile.pl
dsa0:[public.][aexe]perl.exe;5 is installed in perl_root:[lib.VMS_AXP.5_6_1] okay
PPM for perl5.006001
Test Compiling config/signedchar.c
Compiling under VMS
OK=1 OKVMS=1
Test Compiling config/Ksprintf.c
Compiling under VMS
OK=1 OKVMS=1
Test Compiling config/tod.c
Compiling under VMS
OK=1 OKVMS=1
Generic gettimeofday()
VMS version: $xlib = SYS$SHARE:DECW$XLIBSHR.EXE
VMS version: $xinc =
Checking if your kit is complete...
Can't cd to (./ptk/mtk/) win : invalid argument
Can't cd to (./ptk/mtk/) unix : invalid argument
Can't cd to (./ptk/mtk/) tixwin : invalid argument
Can't cd to (./ptk/mtk/) tixunix : invalid argument
Can't cd to (./ptk/mtk/) tixgeneric : invalid argument
Can't cd to (./ptk/mtk/) tclwin : invalid argument
Can't cd to (./ptk/mtk/) tclunix : invalid argument
Can't cd to (./ptk/mtk/) tclgeneric : invalid argument
Can't cd to (./ptk/mtk/) generic : invalid argument
Can't cd to (./ptk/mtk/) additions : invalid argument
Can't cd to ./ptk/mtk/additions.. at /perl_root/lib/File/Find.pm line 535.
%C-F-EINVAL, invalid argument
As you might have expected:
$ dire [.ptk.mtk]*.dir
Directory XY:[TK800_022.PTK.MTK]
ADDITIONS.DIR;1 GENERIC.DIR;1 TCLGENERIC.DIR;1 TCLUNIX.DIR;1
TCLWIN.DIR;1 TIXGENERIC.DIR;1 TIXUNIX.DIR;1 TIXWIN.DIR;1
UNIX.DIR;1 WIN.DIR;1 XLIB.DIR;1
Total of 11 files.
Greetings, Martin
--
Dr. Martin P.J. Zinser [EMAIL PROTECTED]
Deutsche Boerse Systems AG
Neue Boersenstr. 1 Tel: +49 69 2101 5634
60487 Frankfurt FAX: +49 69 2101 3411
Germany Private: [EMAIL PROTECTED]
