summaryrefslogtreecommitdiffstats
path: root/generic/tclThreadAlloc.c
diff options
context:
space:
mode:
authordas <das@noemail.net>2009-11-26 17:37:25 (GMT)
committerdas <das@noemail.net>2009-11-26 17:37:25 (GMT)
commit998843f442cbac8409470a45ee687073a82d1d9e (patch)
tree674a0817570bc888ff1239ae7ff70973f7e55bd7 /generic/tclThreadAlloc.c
parent2ffb38f00b22f994b28301b8dc00a95eaa8246d1 (diff)
downloadtcl-998843f442cbac8409470a45ee687073a82d1d9e.zip
tcl-998843f442cbac8409470a45ee687073a82d1d9e.tar.gz
tcl-998843f442cbac8409470a45ee687073a82d1d9e.tar.bz2
fix warning on LP64
FossilOrigin-Name: ee769e1c33963cfa45f481012ddfc08ef9cd8558
Diffstat (limited to 'generic/tclThreadAlloc.c')
-rwxr-xr-xgeneric/tclThreadAlloc.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclThreadAlloc.c b/generic/tclThreadAlloc.c
index a47b0d8..bd6491c 100755
--- a/generic/tclThreadAlloc.c
+++ b/generic/tclThreadAlloc.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclThreadAlloc.c,v 1.30 2009/09/29 05:03:46 dgp Exp $
+ * RCS: @(#) $Id: tclThreadAlloc.c,v 1.31 2009/11/26 17:37:26 das Exp $
*/
#include "tclInt.h"
@@ -297,6 +297,7 @@ TclpAlloc(
register int bucket;
size_t size;
+#ifndef __LP64__
if (sizeof(int) >= sizeof(size_t)) {
/* An unsigned int overflow can also be a size_t overflow */
const size_t zero = 0;
@@ -307,6 +308,7 @@ TclpAlloc(
return NULL;
}
}
+#endif
cachePtr = TclpGetAllocCache();
if (cachePtr == NULL) {
@@ -440,6 +442,7 @@ TclpRealloc(
return TclpAlloc(reqSize);
}
+#ifndef __LP64__
if (sizeof(int) >= sizeof(size_t)) {
/* An unsigned int overflow can also be a size_t overflow */
const size_t zero = 0;
@@ -450,6 +453,7 @@ TclpRealloc(
return NULL;
}
}
+#endif
cachePtr = TclpGetAllocCache();
if (cachePtr == NULL) {