2010-08-18 Ivan Maidanski <ivmai@mail.ru> (with help from Andreas Tobler)

	* os_dep.c (PROTECT, UNPROTECT): Correct VM_PROT_EXEC to
	VM_PROT_EXECUTE.

diff --git a/ChangeLog b/ChangeLog
index 6ec232e..d0aecae 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2010-08-18  Ivan Maidanski <ivmai@mail.ru> (with help from Andreas Tobler)
+
+       * os_dep.c (PROTECT, UNPROTECT): Correct VM_PROT_EXEC to
+       VM_PROT_EXECUTE.
+
 2010-08-14  Ivan Maidanski <ivmai@mail.ru>
 
        * aclocal.m4: Regenerate (by autoreconf -vif using autoconf-2.67,

diff --git a/os_dep.c b/os_dep.c
index 4ff20b1..b5a3b36 100644 (file)
--- a/os_dep.c
+++ b/os_dep.c
@@ -2881,14 +2881,16 @@ GC_INNER void GC_remove_protection(struct hblk *h, word nblocks,
     STATIC mach_port_t GC_task_self = 0;
 #   define PROTECT(addr,len) \
         if(vm_protect(GC_task_self,(vm_address_t)(addr),(vm_size_t)(len), \
-                FALSE, VM_PROT_READ \
-                | (pages_executable ? VM_PROT_EXEC : 0)) != KERN_SUCCESS) { \
+                      FALSE, VM_PROT_READ \
+                             | (pages_executable ? VM_PROT_EXECUTE : 0)) \
+                != KERN_SUCCESS) { \
             ABORT("vm_protect (PROTECT) failed"); \
         }
 #   define UNPROTECT(addr,len) \
         if(vm_protect(GC_task_self,(vm_address_t)(addr),(vm_size_t)(len), \
-                FALSE, (VM_PROT_READ | VM_PROT_WRITE) \
-                | (pages_executable ? VM_PROT_EXEC : 0)) != KERN_SUCCESS) { \
+                      FALSE, (VM_PROT_READ | VM_PROT_WRITE) \
+                             | (pages_executable ? VM_PROT_EXECUTE : 0)) \
+                != KERN_SUCCESS) { \
             ABORT("vm_protect (UNPROTECT) failed"); \
         }
 # else