diff options
Diffstat (limited to 'generic/tclScan.c')
| -rw-r--r-- | generic/tclScan.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclScan.c b/generic/tclScan.c index e30267b..4a37cf1 100644 --- a/generic/tclScan.c +++ b/generic/tclScan.c @@ -565,7 +565,7 @@ ValidateFormat( /* ARGSUSED */ int Tcl_ScanObjCmd( - ClientData dummy, /* Not used. */ + TCL_UNUSED(ClientData), Tcl_Interp *interp, /* Current interpreter. */ int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument objects. */ @@ -581,7 +581,6 @@ Tcl_ScanObjCmd( Tcl_UniChar ch = 0, sch = 0; Tcl_Obj **objs = NULL, *objPtr = NULL; int flags; - (void)dummy; if (objc < 3) { Tcl_WrongNumArgs(interp, 1, objv, |