diff options
| author | hobbs <hobbs> | 1999-10-13 00:32:49 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 1999-10-13 00:32:49 (GMT) |
| commit | 04ea820b91d40ed30eed4b56ad2f4a12a552cb3f (patch) | |
| tree | 6644d69c8f99aa752688a9e211685986541523fb /unix/tclUnixTest.c | |
| parent | 67604b787a8c97063919f609033bc87ac4d62995 (diff) | |
| download | tcl-04ea820b91d40ed30eed4b56ad2f4a12a552cb3f.zip tcl-04ea820b91d40ed30eed4b56ad2f4a12a552cb3f.tar.gz tcl-04ea820b91d40ed30eed4b56ad2f4a12a552cb3f.tar.bz2 | |
* unix/Makefile.in: purify has to use -best-effort to instrument
* unix/tclAppInit.c: identified potential mem leak when compiling
tcltest (not critical)
* unix/tclUnixPipe.c: fixed mem leak in TclpCreateProcess when
doing alloc between vfork and execvp.
* unix/tclUnixTest.c: fixed mem leak in findexecutable test command
Diffstat (limited to 'unix/tclUnixTest.c')
| -rw-r--r-- | unix/tclUnixTest.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/unix/tclUnixTest.c b/unix/tclUnixTest.c index 7c7559b..d556a2b 100644 --- a/unix/tclUnixTest.c +++ b/unix/tclUnixTest.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixTest.c,v 1.10 1999/04/16 00:48:05 stanton Exp $ + * RCS: @(#) $Id: tclUnixTest.c,v 1.11 1999/10/13 00:32:50 hobbs Exp $ */ #include "tclInt.h" @@ -465,6 +465,9 @@ TestfindexecutableCmd(clientData, interp, argc, argv) Tcl_SetResult(interp, tclExecutableName, TCL_VOLATILE); ckfree(tclExecutableName); } + if (tclNativeExecutableName != NULL) { + ckfree(tclNativeExecutableName); + } tclExecutableName = oldName; tclNativeExecutableName = oldNativeName; |