summaryrefslogtreecommitdiff
path: root/rts/linker/MachO.c
diff options
context:
space:
mode:
authorGHC GitLab CI <ghc-ci@gitlab-haskell.org>2022-01-28 22:33:52 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-02-06 01:43:56 -0500
commit86589b893c092ae900723e76848525f20f6cafbf (patch)
tree3a77beccb4db660a3212e0aef7b330d91effa3b7 /rts/linker/MachO.c
parent2e9248b7f7f645851ceb49931d10b9c5e58d2bbb (diff)
downloadhaskell-86589b893c092ae900723e76848525f20f6cafbf.tar.gz
rts: Generalize mmapForLinkerMarkExecutable
Renamed to mprotectForLinker and allowed setting of arbitrary protection modes.
Diffstat (limited to 'rts/linker/MachO.c')
-rw-r--r--rts/linker/MachO.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/linker/MachO.c b/rts/linker/MachO.c
index 02f2a30605..79d14a2d55 100644
--- a/rts/linker/MachO.c
+++ b/rts/linker/MachO.c
@@ -1436,7 +1436,7 @@ ocMprotect_MachO( ObjectCode *oc )
if(segment->size == 0) continue;
if(segment->prot == SEGMENT_PROT_RX) {
- mmapForLinkerMarkExecutable(segment->start, segment->size);
+ mprotectForLinker(segment->start, segment->size, MEM_READ_EXECUTE);
}
}
@@ -1451,7 +1451,7 @@ ocMprotect_MachO( ObjectCode *oc )
if(section->alloc == SECTION_M32) continue;
switch (section->kind) {
case SECTIONKIND_CODE_OR_RODATA: {
- mmapForLinkerMarkExecutable(section->mapped_start, section->mapped_size);
+ mprotectForLinker(section->mapped_start, section->mapped_size, MEM_READ_EXECUTE);
break;
}
default: