summaryrefslogtreecommitdiffstats
path: root/generic/tclThreadTest.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-03 20:32:33 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-03 20:32:33 (GMT)
commit8c60b1157a27a535111861c5a83b64d502ec1948 (patch)
tree8388b53b8610267c8b8a1755286e96878c170cd3 /generic/tclThreadTest.c
parent97cf6a1affd8abe431bad7a2c560b434aa953354 (diff)
downloadtcl-8c60b1157a27a535111861c5a83b64d502ec1948.zip
tcl-8c60b1157a27a535111861c5a83b64d502ec1948.tar.gz
tcl-8c60b1157a27a535111861c5a83b64d502ec1948.tar.bz2
Mark more unused parameters
Diffstat (limited to 'generic/tclThreadTest.c')
-rw-r--r--generic/tclThreadTest.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclThreadTest.c b/generic/tclThreadTest.c
index 48aa445..7fc748e 100644
--- a/generic/tclThreadTest.c
+++ b/generic/tclThreadTest.c
@@ -223,6 +223,7 @@ ThreadObjCmd(
THREAD_ID, THREAD_JOIN, THREAD_NAMES, THREAD_SEND,
THREAD_WAIT, THREAD_ERRORPROC
};
+ (void)dummy;
if (objc < 2) {
Tcl_WrongNumArgs(interp, 1, objv, "option ?arg ...?");
@@ -1018,6 +1019,7 @@ ThreadEventProc(
Tcl_Interp *interp = tsdPtr->interp;
int code;
const char *result, *errorCode, *errorInfo;
+ (void)mask;
if (interp == NULL) {
code = TCL_ERROR;
@@ -1109,8 +1111,10 @@ ThreadFreeProc(
static int
ThreadDeleteEvent(
Tcl_Event *eventPtr, /* Really ThreadEvent */
- void *clientData) /* dummy */
+ void *dummy) /* dummy */
{
+ (void)dummy;
+
if (eventPtr->proc == ThreadEventProc) {
ckfree(((ThreadEvent *) eventPtr)->script);
return 1;