diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-23 07:15:33 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2011-08-23 07:15:33 (GMT) |
| commit | 379048cb89b55b63858d61a573dbe5537b3656e5 (patch) | |
| tree | 51fe7e26c64cce48918c2f101e4106f7702dd773 /generic | |
| parent | 774fe272d62bba75a17c89818a7eed8f549e6eae (diff) | |
| download | tcl-379048cb89b55b63858d61a573dbe5537b3656e5.zip tcl-379048cb89b55b63858d61a573dbe5537b3656e5.tar.gz tcl-379048cb89b55b63858d61a573dbe5537b3656e5.tar.bz2 | |
gcc 4.6 (64-bit) warnings
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclTest.c | 4 |
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]; |