summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-06-11 08:34:09 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-06-11 08:34:09 (GMT)
commit73d6f913f8988175a6403d61ca243b663286df7a (patch)
tree7c2ac7581455ae78fa21da1c72480a03d82b7578
parent8aa1ab62e1501d779f07a7c0df073f852b5dce4d (diff)
parent70891d45411fa4695f4620b26dda06e94143967e (diff)
downloadtcl-73d6f913f8988175a6403d61ca243b663286df7a.zip
tcl-73d6f913f8988175a6403d61ca243b663286df7a.tar.gz
tcl-73d6f913f8988175a6403d61ca243b663286df7a.tar.bz2
merge trunk
-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 aafbe71..b2a505a 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -489,11 +489,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 48f7894..457c838 100644
--- a/win/tclWinPort.h
+++ b/win/tclWinPort.h
@@ -82,6 +82,7 @@ typedef DWORD_PTR * PDWORD_PTR;
*---------------------------------------------------------------------------
*/
+#include <time.h>
#include <wchar.h>
#include <io.h>
#include <errno.h>
@@ -114,8 +115,6 @@ typedef DWORD_PTR * PDWORD_PTR;
# endif /* __BORLANDC__ */
#endif /* __MWERKS__ */
-#include <time.h>
-
/*
* The following defines redefine the Windows Socket errors as
* BSD errors so Tcl_PosixError can do the right thing.