summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-23 07:22:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-23 07:22:51 (GMT)
commit8d4430b56c8e8f6fa179f64cb5cf4e8c9b9d37d7 (patch)
treeed3f9aee6078b3fdac22b3fafaa24b031b6b292a /generic
parentb001a09fa9bea8a30e18638849438a54fc58c5f2 (diff)
parent379048cb89b55b63858d61a573dbe5537b3656e5 (diff)
downloadtcl-8d4430b56c8e8f6fa179f64cb5cf4e8c9b9d37d7.zip
tcl-8d4430b56c8e8f6fa179f64cb5cf4e8c9b9d37d7.tar.gz
tcl-8d4430b56c8e8f6fa179f64cb5cf4e8c9b9d37d7.tar.bz2
gcc 4.6 (64-bit) warnings
Diffstat (limited to 'generic')
-rw-r--r--generic/tclTest.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index 3e3bc09..96dcb36 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);
@@ -870,7 +870,7 @@ TestasyncCmd(
if (asyncPtr->id == id) {
Tcl_ThreadId threadID;
if (Tcl_CreateThread(&threadID, AsyncThreadProc,
- (ClientData) id, TCL_THREAD_STACK_DEFAULT,
+ INT2PTR(id), TCL_THREAD_STACK_DEFAULT,
TCL_THREAD_NOFLAGS) != TCL_OK) {
Tcl_SetResult(interp, "can't create thread", TCL_STATIC);
return TCL_ERROR;
@@ -901,7 +901,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];
@@ -958,7 +958,7 @@ AsyncThreadProc(
* TestAsyncHandler, defined above. */
{
TestAsyncHandler *asyncPtr;
- int id = (int) clientData;
+ int id = PTR2INT(clientData);
Tcl_Sleep(1);
Tcl_MutexLock(&asyncTestMutex);