projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Build primitive with stage2
[ghc-hetmet.git]
/
rts
/
LinkerInternals.h
diff --git
a/rts/LinkerInternals.h
b/rts/LinkerInternals.h
index
561a224
..
8e151ec
100644
(file)
--- a/
rts/LinkerInternals.h
+++ b/
rts/LinkerInternals.h
@@
-50,7
+50,7
@@
typedef struct {
long mtctr_r12;
long bctr;
} jumpIsland;
long mtctr_r12;
long bctr;
} jumpIsland;
-#elif x86_64_TARGET_ARCH
+#elif x86_64_HOST_ARCH
uint64_t addr;
uint8_t jumpIsland[6];
#endif
uint64_t addr;
uint8_t jumpIsland[6];
#endif
@@
-109,4
+109,6
@@
typedef struct _ObjectCode {
extern ObjectCode *objects;
extern ObjectCode *objects;
+void exitLinker( void );
+
#endif /* LINKERINTERNALS_H */
#endif /* LINKERINTERNALS_H */