summaryrefslogtreecommitdiffstats
path: root/unix/tkUnixSelect.c
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-06-15 11:16:02 (GMT)
committernijtmans <nijtmans>2010-06-15 11:16:02 (GMT)
commit1d9e4b35ac1edb7acb7a11bb871ab2a8d4263892 (patch)
tree377b18f7cb439e3eb421010182cff5c13fb0d3f6 /unix/tkUnixSelect.c
parent8aef287d1e78682504c84c81e646a42a6730939e (diff)
downloadtk-1d9e4b35ac1edb7acb7a11bb871ab2a8d4263892.zip
tk-1d9e4b35ac1edb7acb7a11bb871ab2a8d4263892.tar.gz
tk-1d9e4b35ac1edb7acb7a11bb871ab2a8d4263892.tar.bz2
Eliminate many unnecessary (ClientData) type casts.
Diffstat (limited to 'unix/tkUnixSelect.c')
-rw-r--r--unix/tkUnixSelect.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/unix/tkUnixSelect.c b/unix/tkUnixSelect.c
index 1594e12..6e39ee4 100644
--- a/unix/tkUnixSelect.c
+++ b/unix/tkUnixSelect.c
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkUnixSelect.c,v 1.26 2010/05/26 15:28:10 nijtmans Exp $
+ * RCS: @(#) $Id: tkUnixSelect.c,v 1.27 2010/06/15 11:16:03 nijtmans Exp $
*/
#include "tkInt.h"
@@ -185,7 +185,7 @@ TkSelGetSelection(
*/
retr.timeout = Tcl_CreateTimerHandler(1000, SelTimeoutProc,
- (ClientData) &retr);
+ &retr);
while (retr.result == -1) {
Tcl_DoOneEvent(0);
}
@@ -663,14 +663,14 @@ TkSelEventProc(
retrPtr->idleTime = 0;
Tk_CreateEventHandler(tkwin, PropertyChangeMask, SelRcvIncrProc,
- (ClientData) retrPtr);
+ retrPtr);
XDeleteProperty(Tk_Display(tkwin), Tk_WindowId(tkwin),
retrPtr->property);
while (retrPtr->result == -1) {
Tcl_DoOneEvent(0);
}
Tk_DeleteEventHandler(tkwin, PropertyChangeMask, SelRcvIncrProc,
- (ClientData) retrPtr);
+ retrPtr);
} else {
Tcl_DString ds;
@@ -1163,7 +1163,7 @@ SelRcvIncrProc(
goto done;
}
interp = retrPtr->interp;
- Tcl_Preserve((ClientData) interp);
+ Tcl_Preserve(interp);
if (type == retrPtr->winPtr->dispPtr->compoundTextAtom) {
encoding = Tcl_GetEncoding(NULL, "iso2022");
@@ -1194,7 +1194,7 @@ SelRcvIncrProc(
*/
retrPtr->result = TCL_OK;
- Tcl_Release((ClientData) interp);
+ Tcl_Release(interp);
goto done;
} else {
src = propInfo;
@@ -1237,7 +1237,7 @@ SelRcvIncrProc(
result = retrPtr->proc(retrPtr->clientData, interp,
Tcl_DStringValue(dstPtr));
- Tcl_Release((ClientData) interp);
+ Tcl_Release(interp);
/*
* Copy any unused data into the destination buffer so we can pick it
@@ -1372,7 +1372,7 @@ IncrTimeoutProc(
incrPtr->numIncrs = 0;
} else {
incrPtr->timeout = Tcl_CreateTimerHandler(1000, IncrTimeoutProc,
- (ClientData) incrPtr);
+ incrPtr);
}
}