summaryrefslogtreecommitdiffstats
path: root/generic/tclBasic.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-07 13:58:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-07 13:58:51 (GMT)
commitc92b03f0a41ea3598cc2953a87c251fac504bf7a (patch)
treecef35ca5d056f667b726c878bfa4c2a6e2eba470 /generic/tclBasic.c
parent5ea46c24a2d2e32cd25e06728a7b81f3a949f5a8 (diff)
parent2b93599ffd06e74e9e904fbafd83196839390119 (diff)
downloadtcl-c92b03f0a41ea3598cc2953a87c251fac504bf7a.zip
tcl-c92b03f0a41ea3598cc2953a87c251fac504bf7a.tar.gz
tcl-c92b03f0a41ea3598cc2953a87c251fac504bf7a.tar.bz2
Don't let Tcl compilation depend on USE_32BIT_TIME_T any more: Microsoft could discontinue this macro any moment, then we are prepared ....
As a bonus: time_t is now allowed to be 64-bit internally, without effect on the C API (like stub-enabled extensions)
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r--generic/tclBasic.c14
1 files changed, 4 insertions, 10 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 53d1158..a03f131 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -484,19 +484,13 @@ Tcl_CreateInterp(void)
Tcl_Panic("Tcl_CallFrame must not be smaller than CallFrame");
}
-#if defined(_WIN32) && !defined(_WIN64) && !defined(_USE_64BIT_TIME_T) \
- && !defined(__MINGW_USE_VC2005_COMPAT)
- /* If Tcl is compiled on Win32 using -D_USE_64BIT_TIME_T or
- * -D__MINGW_USE_VC2005_COMPAT, the result is a binary incompatible
- * with the 'standard' build of Tcl: All extensions using Tcl_StatBuf
- * or interal functions like TclpGetDate() need to be recompiled in
+#if defined(_WIN32) && !defined(_WIN64) && !defined(_USE_64BIT_TIME_T)
+ /* If Tcl is compiled on Win32 using -D_USE_64BIT_TIME_T
+ * the result is a binary incompatible with the 'standard' build of
+ * Tcl: All extensions using Tcl_StatBuf need to be recompiled in
* the same way. Therefore, this is not officially supported.
* In stead, it is recommended to use Win64 or Tcl 9.0 (not released yet)
*/
- if (sizeof(time_t) != 4) {
- /*NOTREACHED*/
- Tcl_Panic("<time.h> is not compatible with MSVC");
- }
if ((TclOffset(Tcl_StatBuf,st_atime) != 32)
|| (TclOffset(Tcl_StatBuf,st_ctime) != 40)) {
/*NOTREACHED*/