mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-26 21:20:30 +02:00
Code Activity

Merge remote-tracking branch 'whippet/main' into wip-whippet

Browse source
This commit is contained in:
Andy Wingo 2025-04-23 13:48:18 +02:00
commit 25db208603
8 changed files with 204 additions and 99 deletions
Download patch file Download diff file Expand all files Collapse all files

8
libguile/whippet/src/gc-platform-gnu-linux.c
View file

@ -162,12 +162,12 @@ gc_platform_acquire_memory_from_reservation(struct gc_reservation reservation,
GC_ASSERT(size <= reservation.size);
GC_ASSERT(offset <= reservation.size - size);
void *mem = mmap((void*)(reservation.base + offset), size,
PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0);
if (mem == MAP_FAILED) {
perror("mmap failed");
void *mem = (void*)(reservation.base + offset);
if (mprotect(mem, size, PROT_READ|PROT_WRITE)) {
perror("mprotect failed");
return NULL;
}
// FIXME: Should we gc_platform_populate_memory() here?
return mem;
}