diff options
-rw-r--r-- | generic/tclFileName.c | 1 | ||||
-rw-r--r-- | generic/tclPkg.c | 1 |
2 files changed, 0 insertions, 2 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c index 5679a6c..54c583a 100644 --- a/generic/tclFileName.c +++ b/generic/tclFileName.c @@ -1777,7 +1777,6 @@ TclGlob( if (c != '\0') { tail++; } - Tcl_DStringFree(&buffer); } else { tail = pattern; } diff --git a/generic/tclPkg.c b/generic/tclPkg.c index 6a42a38..c82cd4d 100644 --- a/generic/tclPkg.c +++ b/generic/tclPkg.c @@ -538,7 +538,6 @@ PkgRequireCoreStep1( Tcl_NRAddCallback(interp, PkgRequireCoreStep2, reqPtr, INT2PTR(reqc), (void *) reqv, NULL); Tcl_NREvalObj(interp, Tcl_DStringToObj(&command), TCL_EVAL_GLOBAL); - Tcl_DStringFree(&command); return TCL_OK; } |