diff options
| author | Adam Sandberg Ericsson <adam@sandbergericsson.se> | 2021-04-28 20:11:52 +0100 |
|---|---|---|
| committer | Zubin Duggal <zubin.duggal@gmail.com> | 2021-06-07 18:48:42 +0530 |
| commit | 296f25fa5f0fce033b529547e0658076e26f4cda (patch) | |
| tree | 18552b7f736c2ecaca463c9aecda814cd3f23cb9 | |
| parent | a43a5650f51fdc04d757abc3d86b0a23ec518259 (diff) | |
| download | haskell-wip/ghc-8.10-19763.tar.gz | |
rts: export allocateWrite, freeWrite and markExec #19763wip/ghc-8.10-19763
(cherry picked from commit 2d2985a79eec3d6ae9aee96b264c97c2b158f196)
| -rw-r--r-- | rts/RtsSymbols.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/rts/RtsSymbols.c b/rts/RtsSymbols.c index 9ca696c27c..d5b8cc5fec 100644 --- a/rts/RtsSymbols.c +++ b/rts/RtsSymbols.c @@ -539,11 +539,21 @@ #define RTS_PROF_SYMBOLS /* empty */ #endif +#if RTS_LINKER_USE_MMAP +#define RTS_LINKER_USE_MMAP_SYMBOLS \ + SymI_HasProto(allocateWrite) \ + SymI_HasProto(freeWrite) \ + SymI_HasProto(markExec) +#else +#define RTS_LINKER_USE_MMAP_SYMBOLS /* empty */ +#endif + #define RTS_SYMBOLS \ Maybe_Stable_Names \ RTS_TICKY_SYMBOLS \ RTS_PROF_SYMBOLS \ RTS_LIBDW_SYMBOLS \ + RTS_LINKER_USE_MMAP_SYMBOLS \ SymI_HasProto(StgReturn) \ SymI_HasProto(stg_gc_noregs) \ SymI_HasProto(stg_ret_v_info) \ |