Commit 39cbf830 authored by rrt's avatar rrt
Browse files

[project @ 2000-08-17 15:21:55 by rrt]

barf when a DLLized RTS tries to allocate a 2nd Windows monster block;
is_heap_alloced stops working at this point. No problem for the static
build.
parent 0a92ced2
/* -----------------------------------------------------------------------------
* $Id: MBlock.c,v 1.16 2000/08/04 23:31:44 lewie Exp $
* $Id: MBlock.c,v 1.17 2000/08/17 15:21:55 rrt Exp $
*
* (c) The GHC Team 1998-1999
*
......@@ -173,6 +173,9 @@ getMBlocks(nat n)
if ( (base_non_committed == 0) ||
(next_request + size > base_non_committed + SIZE_RESERVED_POOL) ) {
#ifdef ENABLE_WIN32_DLL_SUPPORT
barf("2nd Windows monster block required; I can only cope with 1!");
#endif
base_non_committed = VirtualAlloc ( NULL
, SIZE_RESERVED_POOL
, MEM_RESERVE
......
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