diff options
Diffstat (limited to 'generic/tclTrace.c')
-rw-r--r-- | generic/tclTrace.c | 16 |
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) { |