summaryrefslogtreecommitdiffstats
path: root/generic/tclTrace.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2018-11-22 08:06:26 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2018-11-22 08:06:26 (GMT)
commit802d3d1aa0b9c547056aa924a20fb7c49f69abb4 (patch)
treeeda983a297686f2e46d335069c56074df9532afa /generic/tclTrace.c
parent02d514946365467a42f4975cae649d248396f7f5 (diff)
parent0e7af6107e1f3b060581d8eb6bacb968c314314d (diff)
downloadtcl-802d3d1aa0b9c547056aa924a20fb7c49f69abb4.zip
tcl-802d3d1aa0b9c547056aa924a20fb7c49f69abb4.tar.gz
tcl-802d3d1aa0b9c547056aa924a20fb7c49f69abb4.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclTrace.c')
-rw-r--r--generic/tclTrace.c16
1 files changed, 4 insertions, 12 deletions
diff --git a/generic/tclTrace.c b/generic/tclTrace.c
index ed50c91..7064975 100644
--- a/generic/tclTrace.c
+++ b/generic/tclTrace.c
@@ -538,9 +538,7 @@ TraceExecutionObjCmd(
Tcl_DeleteTrace(interp, tcmdPtr->stepTrace);
tcmdPtr->stepTrace = NULL;
- if (tcmdPtr->startCmd != NULL) {
- Tcl_Free(tcmdPtr->startCmd);
- }
+ Tcl_Free(tcmdPtr->startCmd);
}
if (tcmdPtr->flags & TCL_TRACE_EXEC_IN_PROGRESS) {
/*
@@ -1350,9 +1348,7 @@ TraceCommandProc(
if (tcmdPtr->stepTrace != NULL) {
Tcl_DeleteTrace(interp, tcmdPtr->stepTrace);
tcmdPtr->stepTrace = NULL;
- if (tcmdPtr->startCmd != NULL) {
- Tcl_Free(tcmdPtr->startCmd);
- }
+ Tcl_Free(tcmdPtr->startCmd);
}
if (tcmdPtr->flags & TCL_TRACE_EXEC_IN_PROGRESS) {
/*
@@ -1815,9 +1811,7 @@ TraceExecutionProc(
&& (strcmp(command, tcmdPtr->startCmd) == 0)) {
Tcl_DeleteTrace(interp, tcmdPtr->stepTrace);
tcmdPtr->stepTrace = NULL;
- if (tcmdPtr->startCmd != NULL) {
- Tcl_Free(tcmdPtr->startCmd);
- }
+ Tcl_Free(tcmdPtr->startCmd);
}
/*
@@ -1942,9 +1936,7 @@ TraceExecutionProc(
if (tcmdPtr->stepTrace != NULL) {
Tcl_DeleteTrace(interp, tcmdPtr->stepTrace);
tcmdPtr->stepTrace = NULL;
- if (tcmdPtr->startCmd != NULL) {
- Tcl_Free(tcmdPtr->startCmd);
- }
+ Tcl_Free(tcmdPtr->startCmd);
}
}
if (call) {