diff options
| author | pooryorick <com.digitalsmarties@pooryorick.com> | 2021-04-02 23:21:50 (GMT) |
|---|---|---|
| committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2021-04-02 23:21:50 (GMT) |
| commit | c98ea4af2fac0552f8453c1787028523e1d19117 (patch) | |
| tree | 20d29a94f5d3acb71c45e54e0664e83cbe9cc07d | |
| parent | 7d6ca39c8fc1416903f2fe01216ed2d7b435feb3 (diff) | |
| download | tcl-c98ea4af2fac0552f8453c1787028523e1d19117.zip tcl-c98ea4af2fac0552f8453c1787028523e1d19117.tar.gz tcl-c98ea4af2fac0552f8453c1787028523e1d19117.tar.bz2 | |
Use TclCleanupCommandMacro instead of just decrementing the reference count.
| -rw-r--r-- | generic/tclBasic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index b90e12d..ce8c4ed 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -3662,7 +3662,7 @@ CallCommandTraces( */ cmdPtr->flags &= ~CMD_TRACE_ACTIVE; - cmdPtr->refCount--; + TclCleanupCommandMacro(cmdPtr); iPtr->activeCmdTracePtr = active.nextPtr; Tcl_Release(iPtr); return result; |