$ use64bitall = "n"
$ use64bitint = "n"
$ uselongdouble = "n"
-$ uselargefiles = "n"
+$ uselargefiles = "y"
$ usestdstat = "n"
$ usesitecustomize = "n"
$ C_Compiler_Replace = "CC="
$ be_case_sensitive = ans
$! IEEE math?
$ echo ""
-$ echo "Perl normally uses IEEE format (T_FLOAT) floating point numbers"
-$ echo "internally on Alpha, but if you need G_FLOAT for binary compatibility"
+$ echo "Perl normally uses IEEE format (T_FLOAT) floating point numbers on"
+$ echo "Alpha and Itanium, but if you need G_FLOAT for binary compatibility"
$ echo "with an external library or existing data, you may wish to disable"
$ echo "the IEEE math option."
$ bool_dflt = use_ieee_math
$ IF use_ieee_math
$ THEN
$ extra_flags = "''extra_flags'" + "/float=ieee/ieee=denorm"
+$ ELSE
+$ IF (archname.EQS."VMS_IA64")
+$ THEN
+$ extra_flags = "''extra_flags'" + "/float=g_float"
+$ ENDIF
$ ENDIF
$ IF be_case_sensitive
$ THEN
$ WS "#if defined(F_SETLK) && defined(F_SETLKW)"
$ WS " struct flock flock;"
$ WS " int retval, fd;"
-$ WS " fd = open(""try.c"", O_RDONLY);"
+$ WS " fd = open(""[-]perl.c"", O_RDONLY);"
$ WS " flock.l_type = F_RDLCK;"
$ WS " flock.l_whence = SEEK_SET;"
$ WS " flock.l_start = flock.l_len = 0;"
$!
$ IF uselargefiles .OR. uselargefiles .eqs. "define"
$ THEN
-$ echo4 "Largefile support enabled (plus standard stat support on V8.2 and later)"
-$ usestdstat = "y"
$ IF (vms_ver .GES. "8.2") .AND. (archname .NES. "VMS_VAX")
$ THEN
+$ echo4 "Largefile support enabled, so enabling standard stat support too."
+$ usestdstat = "y"
$ echo4 -
"Looking for the realpath() function to indicate symbolic link support..."
$ OS
$! Okay, we've gotten here. Build munchconfig.exe
$ COPY/NOLOG [-.vms]munchconfig.c []
$ COPY/NOLOG [-.vms]'Makefile_SH' []
-$ 'Perl_CC' munchconfig.c
+$ 'Perl_CC' 'ccflags' munchconfig.c
$ IF Needs_Opt
$ THEN
$ OPEN/WRITE CONFIG []munchconfig.opt
$ IF use64bitall .OR. use64bitall .EQS. "define" THEN -
WC "#define USE_64_BIT_ALL"
$ IF be_case_sensitive THEN WC "#define VMS_WE_ARE_CASE_SENSITIVE"
+$ IF use_ieee_math THEN WC "#define USE_IEEE"
$ IF d_herrno .EQS. "undef" THEN WC "#define NEED_AN_H_ERRNO"
$ WC "#define HAS_ENVGETENV"
$ WC "#define PERL_EXTERNAL_GLOB"
$ Goto next_ext
$ done:
$ sts = $Status
-$ Set Def &def
+$ Set Def &mydefault
$ Exit sts
$!-- make_ext.com
$EndOfTpl$