X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinkerInternals.h;h=8e151ec782ff2a985b81dac05395f017ae6f99d3;hb=d108044bef62f6a0d579c92ced5e8188f72edc2d;hp=561a224a09de96afa86f2e44e46abe52c6572a7a;hpb=4f4dd70fd10ab13e41cb0f541bbfee2330d149da;p=ghc-hetmet.git

diff --git a/rts/LinkerInternals.h b/rts/LinkerInternals.h
index 561a224..8e151ec 100644
--- a/rts/LinkerInternals.h
+++ b/rts/LinkerInternals.h
@@ -50,7 +50,7 @@ typedef struct {
         long mtctr_r12;
         long bctr;
     } jumpIsland;
-#elif x86_64_TARGET_ARCH
+#elif x86_64_HOST_ARCH
     uint64_t    addr;
     uint8_t     jumpIsland[6];
 #endif
@@ -109,4 +109,6 @@ typedef struct _ObjectCode {
 
 extern ObjectCode *objects;
 
+void exitLinker( void );
+
 #endif /* LINKERINTERNALS_H */