diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2021-01-01 20:43:38 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2021-01-03 10:45:51 -0500 |
| commit | 16a69eafc35eabd1cf579187e980eab685e1d2e1 (patch) | |
| tree | 86bddfd51d28ecc855ec14482d60dac658c9d597 | |
| parent | 2113a1d600e579bb0f54a0526a03626f105c0365 (diff) | |
| download | haskell-16a69eafc35eabd1cf579187e980eab685e1d2e1.tar.gz | |
rts/Linker: Add noreturn to loadNativeObj on non-ELF platformswip/noreturn
| -rw-r--r-- | rts/Linker.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index 176127da24..5502965355 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -2012,19 +2012,23 @@ addSection (Section *s, SectionKind kind, SectionAlloc alloc, #define UNUSED(x) (void)(x) +#if defined(OBJFORMAT_ELF) void * loadNativeObj (pathchar *path, char **errmsg) { -#if defined(OBJFORMAT_ELF) ACQUIRE_LOCK(&linker_mutex); void *r = loadNativeObj_ELF(path, errmsg); RELEASE_LOCK(&linker_mutex); return r; +} #else +void * GNU_ATTRIBUTE(__noreturn__) +loadNativeObj (pathchar *path, char **errmsg) +{ UNUSED(path); UNUSED(errmsg); barf("loadNativeObj: not implemented on this platform"); -#endif } +#endif HsInt unloadNativeObj (void *handle) { |