X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=c3d90d20ccc2123a78a1c4a59f5ca10fba008f5f;hb=f1bef503180c6a0a990d6beb49c1e421c04a3c27;hp=7e937653ee4a59099f763c75cb3698477a3aa399;hpb=0790115160dcca0e2c84157523db1b83db4b1774;p=ghc-hetmet.git diff --git a/rts/Linker.c b/rts/Linker.c index 7e93765..c3d90d2 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -89,6 +89,7 @@ # include #elif defined(darwin_HOST_OS) # define OBJFORMAT_MACHO +# include # include # include # include @@ -1109,7 +1110,9 @@ void initLinker( void ) { RtsSymbolVal *sym; +#if defined(OBJFORMAT_ELF) || defined(OBJFORMAT_MACHO) int compileResult; +#endif /* Make initLinker idempotent, so we can call it before evey relevant operation; that means we