From 83025a44e02d61c30fba4f3e017d029a16f0890f Mon Sep 17 00:00:00 2001
From: pooryorick <com.digitalsmarties@pooryorick.com>
Date: Mon, 5 Apr 2021 21:07:00 +0000
Subject: Replace simple refCount decrement with the proper decrementing
 function.

---
 generic/tclBasic.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 56356e2..27cbeac 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -3740,7 +3740,7 @@ CallCommandTraces(
      */
 
     cmdPtr->flags &= ~CMD_TRACE_ACTIVE;
-    cmdPtr->refCount--;
+	TclCleanupCommandMacro(cmdPtr);
     iPtr->activeCmdTracePtr = active.nextPtr;
     Tcl_Release(iPtr);
     return result;
-- 
cgit v0.12