suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

check result of mprotect()

Browse Source
This commit is contained in:
Matthew Flatt 2014-09-05 13:49:27 -06:00
parent 59d3663106
commit cd17e08f12
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
racket/src/racket/gc2/vm_mmap.c
View File

@ -18,7 +18,7 @@ static void os_protect_pages(void *p, size_t len, int writeable);
static void os_free_pages(void *p, size_t len)
{
if (munmap(p, len)) {
GCPRINT(GCOUTF, "Unmap warning: %lx, %ld, %d\n", (long)p, (long)len, errno);
GCPRINT(GCOUTF, "unmap failed: %lx, %ld, %d\n", (long)p, (long)len, errno);
}
}
@ -51,7 +51,8 @@ static void *os_alloc_pages(size_t len)
static void os_protect_pages(void *p, size_t len, int writeable)
{
mprotect(p, len, (writeable ? (PROT_READ | PROT_WRITE) : PROT_READ));
if (mprotect(p, len, (writeable ? (PROT_READ | PROT_WRITE) : PROT_READ)))
GCPRINT(GCOUTF, "mprotect failed: %lx, %ld, %d, %d\n", (long)p, (long)len, writeable, errno);
}
#include "rlimit_heapsize.c"