diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 11:44:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 11:44:49 (GMT) |
| commit | 1fbedd426d7faecbf706afa024c4316bf31ff8b1 (patch) | |
| tree | 96c798290148ac7d237058f68a1f177fe222b7b6 /generic/tclLink.c | |
| parent | 86987b672b2c4c61b96d2ffbe2a22b2fa1d4c37d (diff) | |
| parent | de370ec86362c9ec5f013683c78a0faa1e51ed75 (diff) | |
| download | tcl-1fbedd426d7faecbf706afa024c4316bf31ff8b1.zip tcl-1fbedd426d7faecbf706afa024c4316bf31ff8b1.tar.gz tcl-1fbedd426d7faecbf706afa024c4316bf31ff8b1.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclLink.c')
| -rw-r--r-- | generic/tclLink.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c index 6a5e73a..8bc738f 100644 --- a/generic/tclLink.c +++ b/generic/tclLink.c @@ -738,7 +738,7 @@ LinkTraceProc( } else if (flags & TCL_TRACE_DESTROYED) { Tcl_ObjSetVar2(interp, linkPtr->varName, NULL, ObjValue(linkPtr), TCL_GLOBAL_ONLY); - Tcl_TraceVar2(interp, Tcl_GetString(linkPtr->varName), NULL, + Tcl_TraceVar2(interp, TclGetString(linkPtr->varName), NULL, TCL_GLOBAL_ONLY|TCL_TRACE_READS|TCL_TRACE_WRITES |TCL_TRACE_UNSETS, LinkTraceProc, linkPtr); } |