diff options
Diffstat (limited to 'generic/tclConfig.c')
| -rw-r--r-- | generic/tclConfig.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/generic/tclConfig.c b/generic/tclConfig.c index ee53461..1428ccc 100644 --- a/generic/tclConfig.c +++ b/generic/tclConfig.c @@ -191,7 +191,7 @@ Tcl_RegisterConfig( static int QueryConfigObjCmd( - ClientData clientData, + void *clientData, Tcl_Interp *interp, int objc, struct Tcl_Obj *const *objv) @@ -199,8 +199,7 @@ QueryConfigObjCmd( QCCD *cdPtr = (QCCD *)clientData; Tcl_Obj *pkgName = cdPtr->pkg; Tcl_Obj *pDB, *pkgDict, *val, *listPtr; - size_t n = 0; - int m; + size_t m, n = 0; static const char *const subcmdStrings[] = { "get", "list", NULL }; @@ -322,7 +321,7 @@ QueryConfigObjCmd( static void QueryConfigDelete( - ClientData clientData) + void *clientData) { QCCD *cdPtr = (QCCD *)clientData; Tcl_Obj *pkgName = cdPtr->pkg; @@ -389,7 +388,7 @@ GetConfigDict( static void ConfigDictDeleteProc( - ClientData clientData, /* Pointer to Tcl_Obj. */ + void *clientData, /* Pointer to Tcl_Obj. */ TCL_UNUSED(Tcl_Interp *)) { Tcl_DecrRefCount((Tcl_Obj *)clientData); |