[commit: ghc] master: Fix build on win64 (78f588c)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/78f588c1d248e10bec137f1a2d52e4421e36ab66

>---------------------------------------------------------------

commit 78f588c1d248e10bec137f1a2d52e4421e36ab66
Author: Ian Lynagh <igloo at earth.li>
Date:   Sat Jun 16 21:40:26 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 de9d5ce..eb3dc1d 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_GetFileAttributesA))          \
       RTS_WIN64_ONLY(SymI_NeedsProto(__imp_GetFileInformationByHandle))  \
       RTS_WIN64_ONLY(SymI_NeedsProto(__imp_GetFileType))                 \
       RTS_WIN64_ONLY(SymI_NeedsProto(__imp_GetLastError))                \