Commit a324b415 authored by wolfgang's avatar wolfgang
Browse files

[project @ 2002-11-05 22:31:53 by wolfgang]

Add the appropriate barf for memory allocation failures on Mac OS X.
parent 64ac3c5f
/* ----------------------------------------------------------------------------- /* -----------------------------------------------------------------------------
* $Id: MBlock.c,v 1.36 2002/11/05 09:31:37 simonmar Exp $ * $Id: MBlock.c,v 1.37 2002/11/05 22:31:53 wolfgang Exp $
* *
* (c) The GHC Team 1998-1999 * (c) The GHC Team 1998-1999
* *
...@@ -120,8 +120,8 @@ my_mmap (void *addr, int size) ...@@ -120,8 +120,8 @@ my_mmap (void *addr, int size)
if(!addr || err) // try to allocate anywhere if(!addr || err) // try to allocate anywhere
err = vm_allocate(mach_task_self(),(vm_address_t*) &ret, size, TRUE); err = vm_allocate(mach_task_self(),(vm_address_t*) &ret, size, TRUE);
if(err) if(err) // don't know what the error codes mean exactly
ret = (void*) -1; barf("memory allocation failed (requested %d bytes)", size);
else else
vm_protect(mach_task_self(),ret,size,FALSE,VM_PROT_READ|VM_PROT_WRITE); vm_protect(mach_task_self(),ret,size,FALSE,VM_PROT_READ|VM_PROT_WRITE);
#else #else
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment