summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-15 08:44:50 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-15 08:44:50 (GMT)
commit9030636def0e19cebb5481f87918dea2a1916020 (patch)
treeecf34bbcff3051bb4ef9d706289d78268fd42763 /generic
parent6da70e54b90ff95fa2643b717c9cfd981a3a5755 (diff)
parente84de0f8429f773ec475c011d9e3a6eff4b2e377 (diff)
downloadtcl-9030636def0e19cebb5481f87918dea2a1916020.zip
tcl-9030636def0e19cebb5481f87918dea2a1916020.tar.gz
tcl-9030636def0e19cebb5481f87918dea2a1916020.tar.bz2
[Bug 3388350] mingw64 compiler warnings
Diffstat (limited to 'generic')
-rw-r--r--generic/tclPosixStr.c4
-rwxr-xr-xgeneric/tclStrToD.c2
2 files changed, 3 insertions, 3 deletions
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;
}