diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-07 16:03:16 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-07 16:03:16 (GMT) |
| commit | 2c34ced219c028ad38fe079b9000f31049a0a42c (patch) | |
| tree | 4b5502463d16f3b5094ef9c11eea1deb97ec35dd /generic/tclOOCall.c | |
| parent | c4a1ea568ee92b0d890bb012f44b345c80f25fa8 (diff) | |
| parent | 467d03dbc94f1e8b6ec74da6ac0f54ce4975bf10 (diff) | |
| download | tcl-2c34ced219c028ad38fe079b9000f31049a0a42c.zip tcl-2c34ced219c028ad38fe079b9000f31049a0a42c.tar.gz tcl-2c34ced219c028ad38fe079b9000f31049a0a42c.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclOOCall.c')
| -rw-r--r-- | generic/tclOOCall.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/generic/tclOOCall.c b/generic/tclOOCall.c index 03b7be0..5498883 100644 --- a/generic/tclOOCall.c +++ b/generic/tclOOCall.c @@ -376,11 +376,10 @@ TclOOInvokeContext( static int SetFilterFlags( ClientData data[], - Tcl_Interp *dummy, + TCL_UNUSED(Tcl_Interp *), int result) { CallContext *contextPtr = (CallContext *)data[0]; - (void)dummy; contextPtr->oPtr->flags |= FILTER_HANDLING; return result; @@ -389,11 +388,10 @@ SetFilterFlags( static int ResetFilterFlags( ClientData data[], - Tcl_Interp *dummy, + TCL_UNUSED(Tcl_Interp *), int result) { CallContext *contextPtr = (CallContext *)data[0]; - (void)dummy; contextPtr->oPtr->flags &= ~FILTER_HANDLING; return result; @@ -402,12 +400,11 @@ ResetFilterFlags( static int FinalizeMethodRefs( ClientData data[], - Tcl_Interp *dummy, + TCL_UNUSED(Tcl_Interp *), int result) { CallContext *contextPtr = (CallContext *)data[0]; int i; - (void)dummy; for (i = 0 ; i < contextPtr->callPtr->numChain ; i++) { TclOODelMethodRef(contextPtr->callPtr->chain[i].mPtr); |