[Bug 3388350] mingw64 compiler warnings

4 files changed, 10 insertions, 4 deletions

diff --git a/ChangeLog b/ChangeLog
index bbe93e8..ada3045 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2011-08-15  Jan Nijtmans  <nijtmans@users.sf.net>
+
+	* win/tclWinPort.h:    [Bug 3388350] mingw64 compiler warnings
+	* generic/tclPosixStr.c
+	* generic/tclStrToD.c
+
 2011-08-12  Don Porter  <dgp@users.sourceforge.net>
 
 	* generic/tclPathObj.c:	[Bug 3389764] Eliminate possibility that dup
diff --git a/generic/tclPosixStr.c b/generic/tclPosixStr.c
index d56a3bf..a11b532 100644
--- a/generic/tclPosixStr.c
+++ b/generic/tclPosixStr.c
@@ -35,7 +35,7 @@ CONST char *
 Tcl_ErrnoId(void)
 {
     switch (errno) {
-#ifdef E2BIG
+#if defined(E2BIG) && (!defined(EOVERFLOW) || (E2BIG != EOVERFLOW))
     case E2BIG: return "E2BIG";
 #endif
 #ifdef EACCES
@@ -482,7 +482,7 @@ Tcl_ErrnoMsg(
      int err)			/* Error number (such as in errno variable). */
 {
     switch (err) {
-#ifdef E2BIG
+#if defined(E2BIG) && (!defined(EOVERFLOW) || (E2BIG != EOVERFLOW))
     case E2BIG: return "argument list too long";
 #endif
 #ifdef EACCES
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 2db239e..aa78c51 100755
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -3096,7 +3096,7 @@ ShouldBankerRoundUpPowD(mp_int* b,
 				/* 1 if the digit is odd, 0 if even */
 {
     int i;
-    const static mp_digit topbit = (1<<(DIGIT_BIT-1));
+    static const mp_digit topbit = (1<<(DIGIT_BIT-1));
     if (b->used < sd || (b->dp[sd-1] & topbit) == 0) {
 	return 0;
     }
diff --git a/win/tclWinPort.h b/win/tclWinPort.h
index 1c88ab2..f29b560 100644
--- a/win/tclWinPort.h
+++ b/win/tclWinPort.h
@@ -107,7 +107,7 @@
 /*
  * Not all mingw32 versions have this struct.
  */
-#if !defined(__BORLANDC__) && !defined(_MSC_VER) && !defined(_WIN64) && !defined(HAVE_STRUCT_STAT32I64)
+#if !defined(__BORLANDC__) && !defined(_MSC_VER) && !defined(_WIN64) && !defined(HAVE_STRUCT_STAT32I64) && defined(BUILD_tcl)
   struct _stat32i64 {
     dev_t st_dev;
     ino_t st_ino;