diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2011-08-23 07:22:51 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2011-08-23 07:22:51 (GMT) |
| commit | 92970e297a6cd0bc49846c7a7fe23967905a288f (patch) | |
| tree | ed3f9aee6078b3fdac22b3fafaa24b031b6b292a /generic/tclTest.c | |
| parent | aa4a922159b0e0df3592c1e354db4d5ec1a3d2f0 (diff) | |
| parent | 275393e4f4c4986560b9e5e91e9500ad821bdc2e (diff) | |
| download | tcl-92970e297a6cd0bc49846c7a7fe23967905a288f.zip tcl-92970e297a6cd0bc49846c7a7fe23967905a288f.tar.gz tcl-92970e297a6cd0bc49846c7a7fe23967905a288f.tar.bz2 | |
gcc 4.6 (64-bit) warnings
Diffstat (limited to 'generic/tclTest.c')
| -rw-r--r-- | generic/tclTest.c | 8 |
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); |