From f2a6ae5582b3a61d6333d47f794a3a54855a56c4 Mon Sep 17 00:00:00 2001 From: Matthew Fluet Date: Fri, 9 Aug 2024 06:47:42 -0400 Subject: [PATCH] Update pointer casts to match MinGW's prototypes for `spawn{p,ve}` --- runtime/basis/MLton/Process/spawne.c | 4 ++-- runtime/basis/MLton/Process/spawnp.c | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/runtime/basis/MLton/Process/spawne.c b/runtime/basis/MLton/Process/spawne.c index 51b2aa2877..bb32d86f2f 100644 --- a/runtime/basis/MLton/Process/spawne.c +++ b/runtime/basis/MLton/Process/spawne.c @@ -24,8 +24,8 @@ C_Errno_t(C_PId_t) MLton_Process_spawne (NullString8_t pNStr, eSaved = env[eLen - 1]; env[eLen - 1] = NULL; res = spawnve (SPAWN_MODE, path, - (const char * const *)args, - (const char * const *)env); + (char * const *)args, + (char * const *)env); /* spawnve failed */ args[aLen - 1] = aSaved; env[eLen - 1] = eSaved; diff --git a/runtime/basis/MLton/Process/spawnp.c b/runtime/basis/MLton/Process/spawnp.c index 91640c4457..d164366804 100644 --- a/runtime/basis/MLton/Process/spawnp.c +++ b/runtime/basis/MLton/Process/spawnp.c @@ -16,7 +16,7 @@ C_Errno_t(C_PId_t) MLton_Process_spawnp (NullString8_t pNStr, aSaved = args[aLen - 1]; args[aLen - 1] = NULL; res = spawnvp (SPAWN_MODE, path, - (const char * const *)args); + (char * const *)args); /* spawnvp failed */ args[aLen - 1] = aSaved; return (C_Errno_t(C_PId_t))res;