Change 33275 by [EMAIL PROTECTED] on 2008/02/11 04:17:45
Correct quad-related %Config variables on VMS.
Affected files ...
... //depot/perl/configure.com#277 edit
Differences ...
==== //depot/perl/configure.com#277 (text) ====
Index: perl/configure.com
--- perl/configure.com#276~33049~ 2008-01-23 01:18:41.000000000 -0800
+++ perl/configure.com 2008-02-10 20:17:45.000000000 -0800
@@ -3183,9 +3183,8 @@
$!
$ perllibs=libs
$!
-$! Are we 64 bit?
$!
-$ IF use64bitint .OR. use64bitint .EQS. "define"
+$ IF archname .NES. "VMS_VAX"
$ THEN
$ d_PRId64 = "define"
$ d_PRIu64 = "define"
@@ -3201,7 +3200,11 @@
$ d_quad = "define"
$ quadtype = "long long"
$ uquadtype = "unsigned long long"
-$ quadkind = "QUAD_IS_LONG_LONG"
+$ quadkind = "3"
+$!
+$ d_frexpl = "define"
+$ d_modfl = "define"
+$ d_modflproto = "define"
$ ELSE
$ d_PRId64 = "undef"
$ d_PRIXU64 = "undef"
@@ -3215,17 +3218,10 @@
$ sPRIu64 = ""
$ sPRIx64 = ""
$ d_quad = "undef"
-$ quadtype = "long"
-$ uquadtype = "unsigned long"
-$ quadkind = "QUAD_IS_LONG"
-$ ENDIF
+$ quadtype = "undef"
+$ uquadtype = "undef"
+$ quadkind = "undef"
$!
-$ IF archname .NES. "VMS_VAX"
-$ THEN
-$ d_frexpl = "define"
-$ d_modfl = "define"
-$ d_modflproto = "define"
-$ ELSE
$ d_frexpl = "undef"
$ d_modfl = "undef"
$ d_modflproto = "undef"
End of Patch.
