Change 34469 by [EMAIL PROTECTED] on 2008/10/07 08:28:05
Refine Win32's s{GM|LOCAL}TIME_{min|max} values based on the output of
Schwern's latest check_max.c program.
See:
http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2008-10/msg00049.html
http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2008-10/msg00137.html
Affected files ...
... //depot/perl/win32/config.bc#186 edit
... //depot/perl/win32/config_H.bc#183 edit
... //depot/perl/win32/config_sh.PL#49 edit
Differences ...
==== //depot/perl/win32/config.bc#186 (text) ====
Index: perl/win32/config.bc
--- perl/win32/config.bc#185~34456~ 2008-10-03 09:19:55.000000000 -0700
+++ perl/win32/config.bc 2008-10-07 01:28:05.000000000 -0700
@@ -867,7 +867,7 @@
run=''
runnm='true'
sGMTIME_max="2147483647"
-sGMTIME_min="-2147483648"
+sGMTIME_min="0"
sLOCALTIME_max="2147483647"
sLOCALTIME_min="0"
sPRIEUldbl='"E"'
==== //depot/perl/win32/config_H.bc#183 (text+w) ====
Index: perl/win32/config_H.bc
--- perl/win32/config_H.bc#182~34449~ 2008-09-30 09:31:09.000000000 -0700
+++ perl/win32/config_H.bc 2008-10-07 01:28:05.000000000 -0700
@@ -4428,7 +4428,7 @@
* the system function gmtime () accepts, and defaults to 0
*/
#define GMTIME_MAX 2147483647 /**/
-#define GMTIME_MIN -2147483648 /**/
+#define GMTIME_MIN 0 /**/
/* LOCALTIME_MAX:
* This symbol contains the maximum value for the time_t offset that
==== //depot/perl/win32/config_sh.PL#49 (text) ====
Index: perl/win32/config_sh.PL
--- perl/win32/config_sh.PL#48~34449~ 2008-09-30 09:31:09.000000000 -0700
+++ perl/win32/config_sh.PL 2008-10-07 01:28:05.000000000 -0700
@@ -136,12 +136,7 @@
# at least the range of that).
if ($opt{cc} eq 'cl' and $opt{ccversion} =~ /^(\d+)/) {
my $ccversion = $1;
- if ($ccversion == 14) {
- $opt{sGMTIME_max} = 32535244799;
- $opt{sLOCALTIME_max} = 32535244799;
- }
- elsif ($ccversion >= 15) {
- $opt{sGMTIME_min} = -43200;
+ if ($ccversion >= 14) {
$opt{sGMTIME_max} = 32535291599;
$opt{sLOCALTIME_max} = 32535244799;
}
End of Patch.