From 2ad7cef5dd78e116be3f5fd975a12ee2e1f8ab17 Mon Sep 17 00:00:00 2001
From: Marius Gerbershagen <marius.gerbershagen@gmail.com>
Date: Sat, 7 Jul 2018 22:03:52 +0200
Subject: [PATCH] fix exit code of processes in si_waitpid on windows

    GetExitCodeProcess returns the exit code in a DWORD, which is an
    unsigned integer, however main functions usually return a signed int, so
    we need put in an explicit type cast.
---
 src/c/unixsys.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/c/unixsys.d b/src/c/unixsys.d
index b3336b5d3..8ed655414 100644
--- a/src/c/unixsys.d
+++ b/src/c/unixsys.d
@@ -152,7 +152,7 @@ si_waitpid(cl_object pid, cl_object wait)
     code = ECL_NIL;
   } else {
     status = @':exited';
-    code = ecl_make_fixnum(exitcode);
+    code = ecl_make_fixnum((int)exitcode);
     pid->foreign.data = NULL;
     CloseHandle(*hProcess);
   }