summaryrefslogtreecommitdiffstats
path: root/generic/tclBasic.c
diff options
context:
space:
mode:
authorpooryorick <com.digitalsmarties@pooryorick.com>2021-04-13 22:44:04 (GMT)
committerpooryorick <com.digitalsmarties@pooryorick.com>2021-04-13 22:44:04 (GMT)
commitc993263332c1a88c8ba4da7906fd279171ef2253 (patch)
tree07f188e24522f3def861aa49923d8bc15d43cd23 /generic/tclBasic.c
parent28ddee7d1816b60b019c72adc2ba4a4171a01d3b (diff)
downloadtcl-c993263332c1a88c8ba4da7906fd279171ef2253.zip
tcl-c993263332c1a88c8ba4da7906fd279171ef2253.tar.gz
tcl-c993263332c1a88c8ba4da7906fd279171ef2253.tar.bz2
Remove unnecessary reference counting.
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r--generic/tclBasic.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index aa6d203..5ca70d4 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -3684,7 +3684,6 @@ CallCommandTraces(
}
}
cmdPtr->flags |= CMD_TRACE_ACTIVE;
- cmdPtr->refCount++;
result = NULL;
active.nextPtr = iPtr->activeCmdTracePtr;
@@ -3742,9 +3741,6 @@ CallCommandTraces(
*/
cmdPtr->flags &= ~CMD_TRACE_ACTIVE;
- cmdPtr->refCount--;
- /* Don't free cmdPtr here, since the caller of CallCommandTraces()
- * is responsible for that. See Tcl_DeleteCommandFromToken() */
iPtr->activeCmdTracePtr = active.nextPtr;
Tcl_Release(iPtr);
return result;