diff options
| author | Austin Seipp <aseipp@pobox.com> | 2013-08-23 21:45:25 -0500 |
|---|---|---|
| committer | Austin Seipp <aseipp@pobox.com> | 2013-08-24 05:03:15 -0500 |
| commit | a54ace7bfdcb7841cadeb0ce62b604f502050672 (patch) | |
| tree | f1432d666b6f5c939fcfc52546bf9dff508652e8 | |
| parent | 3229eadbff857b110f20ffddb80d5f7abd5d7216 (diff) | |
| download | haskell-a54ace7bfdcb7841cadeb0ce62b604f502050672.tar.gz | |
Fix i386/Linux build.
Signed-off-by: Austin Seipp <aseipp@pobox.com>
| -rw-r--r-- | rts/Linker.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index b193149184..4961ecf053 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -2057,11 +2057,15 @@ void freeObjectCode (ObjectCode *oc) sysErrorBelch("munmap"); } +#if defined(powerpc_HOST_ARCH) || defined(x86_64_HOST_ARCH) || defined(arm_HOST_ARCH) +#if !defined(x86_64_HOST_ARCH) || !defined(mingw32_HOST_OS) if (!USE_CONTIGUOUS_MMAP) { munmap(oc->symbol_extras, ROUND_UP(sizeof(SymbolExtra) * oc->n_symbol_extras, pagesize)); } +#endif +#endif #else @@ -2073,7 +2077,6 @@ void freeObjectCode (ObjectCode *oc) #endif #endif - #endif stgFree(oc->fileName); |