summaryrefslogtreecommitdiffstats
path: root/generic/tclBasic.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2023-01-30 15:37:41 (GMT)
committerdgp <dgp@users.sourceforge.net>2023-01-30 15:37:41 (GMT)
commitd3dae9eba4c8d979d72feddfded60eb08835543d (patch)
treeaa8382a7ae95f8a32dd49a411378ca96286a6e4f /generic/tclBasic.c
parent7f87f0f8ea86cf01682eb02e4fa8c313dc6ef4ef (diff)
downloadtcl-d3dae9eba4c8d979d72feddfded60eb08835543d.zip
tcl-d3dae9eba4c8d979d72feddfded60eb08835543d.tar.gz
tcl-d3dae9eba4c8d979d72feddfded60eb08835543d.tar.bz2
silence compiler warning
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r--generic/tclBasic.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index cdaf6fe..a31bfb6 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -9919,7 +9919,7 @@ TclNRCoroutineActivateCallback(
if (corPtr->yieldPtr) {
for (runPtr = TOP_CB(interp); runPtr; runPtr = runPtr->nextPtr) {
if (runPtr->data[1] == corPtr->yieldPtr) {
- Tcl_DecrRefCount(runPtr->data[1]);
+ Tcl_DecrRefCount((Tcl_Obj *)runPtr->data[1]);
runPtr->data[1] = NULL;
corPtr->yieldPtr = NULL;
break;