summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-05-16 12:22:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-05-16 12:22:51 (GMT)
commit65dd4e6fd7b8fb775cc64a3c846153190ddd01b1 (patch)
treefc529af33d77973c27a568e90d035a6cc6a9c8c0
parent2c13dd7338d32cd3691df3d31100b0c760712afc (diff)
parent880f2f98f5cb2c020219b568c53c4e03d4d28633 (diff)
downloadtcl-65dd4e6fd7b8fb775cc64a3c846153190ddd01b1.zip
tcl-65dd4e6fd7b8fb775cc64a3c846153190ddd01b1.tar.gz
tcl-65dd4e6fd7b8fb775cc64a3c846153190ddd01b1.tar.bz2
Add support for the latest mingw-4.0-rc1. See: [http://sourceforge.net/p/mingw/mingw-org-wsl/ci/4.0-rc1/tree/NEWS]
-rw-r--r--ChangeLog8
-rw-r--r--generic/tclBasic.c15
-rwxr-xr-xwin/configure5
-rw-r--r--win/tcl.m42
4 files changed, 30 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 5eb12dc..ea9d974 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2013-05-16 Jan Nijtmans <nijtmans@users.sf.net>
+
+ * win/tcl.m4: Add support for the latest mingw-4.0-rc1.
+ * win/configure: (regenerated)
+ * generic/tclBasic.c: Add panic in order to detect
+ incompatible mingw32 sys/stat.h and sys/time.h headers,
+ (which is fixed by defining _HAVE_32BIT_TIME_T).
+
2013-05-06 Jan Nijtmans <nijtmans@users.sf.net>
* generic/tclStubInit.c: Add support for Cygwin64, which has a 64-bit
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index d3b5490..c691018 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -15,6 +15,10 @@
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*/
+#if defined(_WIN32) && !defined(_WIN64)
+# define _USE_32BIT_TIME_T
+#endif
+
#include "tclInt.h"
#include "tclCompile.h"
#include <float.h>
@@ -410,6 +414,17 @@ Tcl_CreateInterp(void)
Tcl_Panic("Tcl_CallFrame must not be smaller than CallFrame");
}
+#if defined(_WIN32) && !defined(_WIN64)
+ if (sizeof(time_t) != 4) {
+ /*NOTREACHED*/
+ Tcl_Panic("sys/time.h is not compatible with MSVC");
+ }
+ if (sizeof(Tcl_StatBuf) != 48) {
+ /*NOTREACHED*/
+ Tcl_Panic("sys/stat.h is not compatible with MSVC");
+ }
+#endif
+
/*
* Initialize support for namespaces and create the global namespace
* (whose name is ""; an alias is "::"). This also initializes the Tcl
diff --git a/win/configure b/win/configure
index a1c0f6d..111f5a4 100755
--- a/win/configure
+++ b/win/configure
@@ -4031,6 +4031,11 @@ cat >>confdefs.h <<\_ACEOF
#define HAVE_NO_SEH 1
_ACEOF
+
+cat >>confdefs.h <<\_ACEOF
+#define _HAVE_32BIT_TIME_T 1
+_ACEOF
+
fi
#
diff --git a/win/tcl.m4 b/win/tcl.m4
index 5696366..e60967f 100644
--- a/win/tcl.m4
+++ b/win/tcl.m4
@@ -1006,6 +1006,8 @@ AC_DEFUN([SC_CONFIG_CFLAGS], [
if test "$tcl_cv_seh" = "no" ; then
AC_DEFINE(HAVE_NO_SEH, 1,
[Defined when mingw does not support SEH])
+ AC_DEFINE(_HAVE_32BIT_TIME_T, 1,
+ [Defined for mingw to use pre-2005 time API])
fi
#