diff --git a/ldb/mach-os.c b/ldb/mach-os.c index 90d306eeecbdb53b907ac2b015f6e72d84092fbd..7b2c7f5d43028da9a03723dbb835ce4e872963ae 100644 --- a/ldb/mach-os.c +++ b/ldb/mach-os.c @@ -1,5 +1,5 @@ /* - * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/ldb/Attic/mach-os.c,v 1.3 1991/10/22 18:38:11 wlott Exp $ + * $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/ldb/Attic/mach-os.c,v 1.4 1992/03/02 04:10:36 wlott Exp $ * * OS-dependent routines. This file (along with os.h) exports an * OS-independent interface to the operating system VM facilities. @@ -49,6 +49,9 @@ vm_size_t len; segments = -1; + vm_protect(task_self(), addr, len, TRUE, + VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE); + return addr; } @@ -88,6 +91,9 @@ vm_size_t len; segments = -1; + vm_protect(task_self(), addr, len, TRUE, + VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE); + return addr; }