diff options
| author | Steve Bennett <steveb@workware.net.au> | 2014-04-23 10:04:30 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2014-04-23 14:35:12 +1000 |
| commit | 8cb7e5a255b03251840263eda4b0b8904dd39db3 (patch) | |
| tree | d55fc54d6bea036aeaef69cc0a868c3e4d914f50 /jim-posix.c | |
| parent | 3bd0956e7c9d463fd96135d90608dcb1907e667f (diff) | |
| download | jimtcl-8cb7e5a255b03251840263eda4b0b8904dd39db3.zip jimtcl-8cb7e5a255b03251840263eda4b0b8904dd39db3.tar.gz jimtcl-8cb7e5a255b03251840263eda4b0b8904dd39db3.tar.bz2 | |
os.gethostname: avoid mem leak on gethostname failure
Courtesy of coverity
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'jim-posix.c')
| -rw-r--r-- | jim-posix.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/jim-posix.c b/jim-posix.c index 5c1ae7f..af8c0f1 100644 --- a/jim-posix.c +++ b/jim-posix.c @@ -187,6 +187,7 @@ static int Jim_PosixGethostnameCommand(Jim_Interp *interp, int argc, Jim_Obj *co buf = Jim_Alloc(JIM_HOST_NAME_MAX); if (gethostname(buf, JIM_HOST_NAME_MAX) == -1) { Jim_PosixSetError(interp); + Jim_Free(buf); rc = JIM_ERR; } else { |