Differences From Artifact [2d5715aa28]:

• File generic/tclTrace.c — part of check-in [ec91b85b61] at 2015-07-02 08:17:50 on branch trunk — Another round of refCount consistancy improvements. (user: jan.nijtmans size: 96761) [more...]

To Artifact [f34dff9f41]:

• File generic/tclTrace.c — part of check-in [1bfaa8fd18] at 2016-01-18 14:32:41 on branch trunk — Eliminate some usages of Tcl_GlobalEval() and Tcl_Eval(), which are deprecated functions. (user: jan.nijtmans size: 96797) [more...]

1885
1886
1887
1888
1889
1890
1891
1892

1893
1894
1895
1896
1897
1898
1899

	    /*
	     * This line can have quite arbitrary side-effects, including
	     * deleting the trace, the command being traced, or even the
	     * interpreter.
	     */

	    traceCode = Tcl_Eval(interp, Tcl_DStringValue(&cmd));

	    tcmdPtr->flags &= ~TCL_TRACE_EXEC_IN_PROGRESS;

	    /*
	     * Restore the interp tracing flag to prevent cmd traces from
	     * affecting interp traces.
	     */

|
>

1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900

	    /*
	     * This line can have quite arbitrary side-effects, including
	     * deleting the trace, the command being traced, or even the
	     * interpreter.
	     */

	    traceCode = Tcl_EvalEx(interp, Tcl_DStringValue(&cmd),
		    Tcl_DStringLength(&cmd), 0);
	    tcmdPtr->flags &= ~TCL_TRACE_EXEC_IN_PROGRESS;

	    /*
	     * Restore the interp tracing flag to prevent cmd traces from
	     * affecting interp traces.
	     */