[commit: ghc] master: Fix build on Win64 (59e1f06)
Ian Lynagh
igloo at earth.li
Thu May 17 04:39:10 CEST 2012
Repository : ssh://darcs.haskell.org//srv/darcs/ghc
On branch : master
http://hackage.haskell.org/trac/ghc/changeset/59e1f0687aa6e2d65c4de314f80b13e4aedad8bc
>---------------------------------------------------------------
commit 59e1f0687aa6e2d65c4de314f80b13e4aedad8bc
Author: Ian Lynagh <igloo at earth.li>
Date: Thu May 10 00:53:28 2012 +0100
Fix build on Win64
>---------------------------------------------------------------
rts/Linker.c | 1 +
1 files changed, 1 insertions(+), 0 deletions(-)
diff --git a/rts/Linker.c b/rts/Linker.c
index b23ff93..d7ab54e 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -540,6 +540,7 @@ typedef struct _RtsSymbolVal {
RTS_WIN64_ONLY(SymI_NeedsProto(__imp__fstat64)) \
RTS_WIN64_ONLY(SymI_NeedsProto(__imp__wsopen)) \
RTS_WIN64_ONLY(SymI_HasProto(__imp__environ)) \
+ RTS_WIN64_ONLY(SymI_NeedsProto(__imp_GetFileInformationByHandle)) \
RTS_WIN64_ONLY(SymI_NeedsProto(__imp_GetFileType)) \
RTS_WIN64_ONLY(SymI_NeedsProto(__imp_GetLastError)) \
RTS_WIN64_ONLY(SymI_NeedsProto(__imp_QueryPerformanceFrequency)) \
More information about the Cvs-ghc
mailing list