From 24c8699dff7bc2b3be4c45aa61c32cb22782b175 Mon Sep 17 00:00:00 2001 From: Stas Boukarev Date: Wed, 6 Dec 2017 17:03:33 +0300 Subject: [PATCH] Fix map_gc_page on win32. Map the whole page, not 8 bytes. --- src/runtime/win32-os.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/runtime/win32-os.c b/src/runtime/win32-os.c index f92868fe1..cefbcdd81 100644 --- a/src/runtime/win32-os.c +++ b/src/runtime/win32-os.c @@ -284,7 +284,7 @@ static void set_seh_frame(void *frame) void alloc_gc_page() { - AVER(VirtualAlloc(GC_SAFEPOINT_PAGE_ADDR, sizeof(lispobj), + AVER(VirtualAlloc(GC_SAFEPOINT_PAGE_ADDR, BACKEND_PAGE_BYTES, MEM_RESERVE|MEM_COMMIT, PAGE_READWRITE)); } @@ -312,14 +312,14 @@ void alloc_gc_page() void map_gc_page() { DWORD oldProt; - AVER(VirtualProtect((void*) GC_SAFEPOINT_PAGE_ADDR, sizeof(lispobj), + AVER(VirtualProtect((void*) GC_SAFEPOINT_PAGE_ADDR, BACKEND_PAGE_BYTES, PAGE_READWRITE, &oldProt)); } void unmap_gc_page() { DWORD oldProt; - AVER(VirtualProtect((void*) GC_SAFEPOINT_PAGE_ADDR, sizeof(lispobj), + AVER(VirtualProtect((void*) GC_SAFEPOINT_PAGE_ADDR, BACKEND_PAGE_BYTES, PAGE_NOACCESS, &oldProt)); } -- 2.11.4.GIT