mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-06-17 02:40:00 +00:00
Code Issues 1 Releases Wiki Activity

Appease MSVC.

Browse Source
This commit is contained in:
Calvin Rose 2019-05-30 19:21:11 -04:00
parent 7fdb098a20
commit d005ac6888
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/core/os.c
View File

@ -167,7 +167,7 @@ static char **os_execute_env(int32_t argc, const Janet *argv) {
/* Free memory from os_execute */
static void os_execute_cleanup(char **envp, const char **child_argv) {
free(child_argv);
free((void *)child_argv);
if (NULL != envp) {
char **envitem = envp;
while (*envitem != NULL) {
@ -210,13 +210,13 @@ static Janet os_execute(int32_t argc, Janet *argv) {
_flushall();
if (flags & (JANET_OS_EFLAG_P | JANET_OS_EFLAG_E)) {
status = _spawnvpe(_P_WAIT, child_argv[0], cargv, envp);
status = (int) _spawnvpe(_P_WAIT, child_argv[0], cargv, envp);
} else if (flags & JANET_OS_EFLAG_P) {
status = _spawnvp(_P_WAIT, child_argv[0], cargv);
status = (int) _spawnvp(_P_WAIT, child_argv[0], cargv);
} else if (flags & JANET_OS_EFLAG_E) {
status = _spawnve(_P_WAIT, child_argv[0], cargv, envp);
status = (int) _spawnve(_P_WAIT, child_argv[0], cargv, envp);
} else {
status = _spawnv(_P_WAIT, child_argv[0], cargv);
status = (int) _spawnv(_P_WAIT, child_argv[0], cargv);
}
os_execute_cleanup(envp, child_argv);