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

diff --git a/rts/LinkerInternals.h b/rts/LinkerInternals.h
index f081e62..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
@@ -85,9 +85,6 @@ typedef struct _ObjectCode {
        list. */
     Section* sections;
 
-    /* A private hash table for local symbols. */
-    HashTable* lochash;
-    
     /* Allow a chain of these things */
     struct _ObjectCode * next;
 
@@ -112,4 +109,6 @@ typedef struct _ObjectCode {
 
 extern ObjectCode *objects;
 
+void exitLinker( void );
+
 #endif /* LINKERINTERNALS_H */