summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-06-11 07:58:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-06-11 07:58:01 (GMT)
commita9614d87b805cb106c4876c73858300e3c4359a3 (patch)
tree8c818c6541faf545fff407bc6b6633c6f8329bf9
parent68d9ec32251e4fef72df8960441ff9784a7b8381 (diff)
downloadtcl-a9614d87b805cb106c4876c73858300e3c4359a3.zip
tcl-a9614d87b805cb106c4876c73858300e3c4359a3.tar.gz
tcl-a9614d87b805cb106c4876c73858300e3c4359a3.tar.bz2
Improve compatibility detection for <time.h> and <sys/stat.h>:
- Move <time.h> before other includes on Windows, so we are sure the time_t definition being checked doesn't come from <sys/types.h>. - Padding at the end of Tcl_StatBuf doesn't influcence binary compatibility, so relax panic check accordingly.
-rw-r--r--generic/tclBasic.c7
-rw-r--r--win/tclWinPort.h3
2 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 5e6b500..4f24515 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -413,11 +413,12 @@ Tcl_CreateInterp(void)
#if defined(_WIN32) && !defined(_WIN64)
if (sizeof(time_t) != 4) {
/*NOTREACHED*/
- Tcl_Panic("sys/time.h is not compatible with MSVC");
+ Tcl_Panic("<time.h> is not compatible with MSVC");
}
- if (sizeof(Tcl_StatBuf) != 48) {
+ if ((TclOffset(Tcl_StatBuf,st_atime) != 32)
+ || (TclOffset(Tcl_StatBuf,st_ctime) != 40)) {
/*NOTREACHED*/
- Tcl_Panic("sys/stat.h is not compatible with MSVC");
+ Tcl_Panic("<sys/stat.h> is not compatible with MSVC");
}
#endif
diff --git a/win/tclWinPort.h b/win/tclWinPort.h
index f58014c..987d45b 100644
--- a/win/tclWinPort.h
+++ b/win/tclWinPort.h
@@ -51,6 +51,7 @@ typedef DWORD_PTR * PDWORD_PTR;
*---------------------------------------------------------------------------
*/
+#include <time.h>
#include <io.h>
#include <stdio.h>
#include <stdlib.h>
@@ -85,8 +86,6 @@ typedef DWORD_PTR * PDWORD_PTR;
# endif /* __BORLANDC__ */
#endif /* __MWERKS__ */
-#include <time.h>
-
/*
* Define EINPROGRESS in terms of WSAEINPROGRESS.
*/