summaryrefslogtreecommitdiffstats
path: root/generic/tclTest.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-23 07:15:33 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-23 07:15:33 (GMT)
commit379048cb89b55b63858d61a573dbe5537b3656e5 (patch)
tree51fe7e26c64cce48918c2f101e4106f7702dd773 /generic/tclTest.c
parent774fe272d62bba75a17c89818a7eed8f549e6eae (diff)
downloadtcl-379048cb89b55b63858d61a573dbe5537b3656e5.zip
tcl-379048cb89b55b63858d61a573dbe5537b3656e5.tar.gz
tcl-379048cb89b55b63858d61a573dbe5537b3656e5.tar.bz2
gcc 4.6 (64-bit) warnings
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r--generic/tclTest.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index b43dbd2..2430d1a 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -799,7 +799,7 @@ TestasyncCmd(
asyncPtr->id = nextId;
nextId++;
asyncPtr->handler = Tcl_AsyncCreate(AsyncHandlerProc,
- (ClientData) asyncPtr->id);
+ INT2PTR(asyncPtr->id));
asyncPtr->nextPtr = firstHandler;
firstHandler = asyncPtr;
Tcl_MutexUnlock(&asyncTestMutex);
@@ -899,7 +899,7 @@ AsyncHandlerProc(
int code) /* Current return code from command. */
{
TestAsyncHandler *asyncPtr;
- int id = (int) clientData;
+ int id = PTR2INT(clientData);
const char *listArgv[4], *cmd;
char string[TCL_INTEGER_SPACE];