summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMoritz Angermann <moritz.angermann@gmail.com>2018-03-02 14:19:58 -0500
committerBen Gamari <ben@smart-cactus.org>2018-03-02 15:41:04 -0500
commit4a0d0d8062a204b867fc510c50e69a056ce7636f (patch)
tree0168120d4d35fa80a4512934ffc331ce0ca502ff
parentaef2b429072e3d3bbdbcb9e4082a0d86ba329d9e (diff)
downloadhaskell-4a0d0d8062a204b867fc510c50e69a056ce7636f.tar.gz
Various Windows / Cross Compile to Windows fixes
- Adds quick-cross-ncg flavour. - Fix windows wchar with `_s` for mingw - Lookup windres, dllwrap and objdump - Fix type. Reviewers: bgamari, hvr, Phyx, erikd, simonmar Reviewed By: bgamari Subscribers: rwbarton, thomie, erikd, carter Differential Revision: https://phabricator.haskell.org/D4430
-rw-r--r--configure.ac4
-rw-r--r--libraries/base/cbits/Win32Utils.c2
-rw-r--r--rts/PathUtils.c5
-rw-r--r--rts/win32/OSMem.c2
4 files changed, 12 insertions, 1 deletions
diff --git a/configure.ac b/configure.ac
index 216f43fa7c..1d3effbd26 100644
--- a/configure.ac
+++ b/configure.ac
@@ -418,6 +418,10 @@ then
AC_PATH_PROG([DllWrap],[dllwrap])
AC_PATH_PROG([Windres],[windres])
AC_PATH_PROG([Genlib],[genlib])
+else
+ AC_CHECK_TARGET_TOOL([Windres],[windres])
+ AC_CHECK_TARGET_TOOL([DllWrap],[dllwrap])
+ AC_CHECK_TARGET_TOOL([OBJDUMP],[objdump])
fi
DllWrapCmd="$DllWrap"
diff --git a/libraries/base/cbits/Win32Utils.c b/libraries/base/cbits/Win32Utils.c
index ce7ce97fc0..b33db04c35 100644
--- a/libraries/base/cbits/Win32Utils.c
+++ b/libraries/base/cbits/Win32Utils.c
@@ -9,6 +9,8 @@
#include "HsBase.h"
#include <stdbool.h>
#include <stdint.h>
+/* Using Secure APIs */
+#define MINGW_HAS_SECURE_API 1
#include <wchar.h>
#include <windows.h>
diff --git a/rts/PathUtils.c b/rts/PathUtils.c
index 1b0b729f07..def3f7e329 100644
--- a/rts/PathUtils.c
+++ b/rts/PathUtils.c
@@ -7,6 +7,11 @@
#include <libgen.h>
#include <ctype.h>
+#if defined(mingw32_HOST_OS)
+/* Using Secure APIs */
+#define MINGW_HAS_SECURE_API 1
+#include <wchar.h>
+#endif
pathchar* pathdup(pathchar *path)
{
diff --git a/rts/win32/OSMem.c b/rts/win32/OSMem.c
index c67b95be82..534cd15fa6 100644
--- a/rts/win32/OSMem.c
+++ b/rts/win32/OSMem.c
@@ -458,7 +458,7 @@ void *osReserveHeapMemory (void *startAddress, W_ *len)
sysErrorBelch(
"osReserveHeapMemory: VirtualAlloc MEM_RESERVE %llu bytes \
at address %p bytes failed",
- len + MBLOCK_SIZE, startAddress);
+ *len + MBLOCK_SIZE, startAddress);
}
stg_exit(EXIT_FAILURE);
}