[Guile-commits] 06/16: Clear errno before CreateProcess for MinGW.

[Jan Nieuwenhuizen]

janneke pushed a commit to branch wip-mingw
in repository guile.

commit ebf0b5b34fe81035a35ec45010153a9615a0f4c8
Author: Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Wed Apr 1 18:03:09 2020 +0200

    Clear errno before CreateProcess for MinGW.
    
    * libguile/posix-w32.c (start_child): Avoid recursing (and breaking any
    PIPE setup) when running in WINE.
---
 libguile/posix-w32.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/libguile/posix-w32.c b/libguile/posix-w32.c
index 44f033da1..2bcc31696 100644
--- a/libguile/posix-w32.c
+++ b/libguile/posix-w32.c
@@ -685,6 +685,10 @@ start_child (const char *exec_file, char **argv,
   cmdline = prepare_cmdline (exec_file, (const char * const *)argv,
                              bin_sh_replaced);
 
+  /* When running in WINE, chances are we hit ENOENT (possibly
+     translated to ENOEXEC).  */
+  errno = 0;
+
   /* All set and ready to fly.  Launch the child process.  */
   if (!CreateProcess (progfile, cmdline, NULL, NULL, TRUE, 0, env_block, NULL,
                       &si, &pi))