suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix memory leak

Browse Source 
Free env variable if it was allocated.
This commit is contained in:
Paulo Matos 2018-09-25 09:58:26 +02:00 committed by Matthew Flatt
parent 9020f5aac5
commit ad7797e2cf
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
racket/src/rktio/rktio_process.c
View File

@ -1434,6 +1434,10 @@ rktio_process_result_t *rktio_process(rktio_t *rktio,
} else {
RKTIO_CLOSE_SUBPROCESS_COPY(err_subprocess, 1);
}
if (env)
free(env);
return NULL;
case 0: /* child */
@ -1497,7 +1501,7 @@ rktio_process_result_t *rktio_process(rktio_t *rktio,
if (err)
err = errno;
if (envvars)
if (env)
free(env);
/* If we get here it failed; give up */
@ -1519,7 +1523,8 @@ rktio_process_result_t *rktio_process(rktio_t *rktio,
/* Close unneeded descriptors */
/*--------------------------------------*/
free(env);
if (env)
free(env);
if (!stdin_fd)
RKTIO_CLOSE(to_subprocess[0]);