diff options
| author | sof <unknown> | 2002-01-21 17:18:43 +0000 |
|---|---|---|
| committer | sof <unknown> | 2002-01-21 17:18:43 +0000 |
| commit | 5858853b4c9cf1d3534e61175251a960cbd0b48e (patch) | |
| tree | ae5cae06f6e93637a58d27f9b2bf54f1454b2744 /ghc/rts/MBlock.h | |
| parent | a8176b20a96ec219f0eb4269f908efbd5f5d9902 (diff) | |
| download | haskell-5858853b4c9cf1d3534e61175251a960cbd0b48e.tar.gz | |
[project @ 2002-01-21 17:18:43 by sof]
multi-slurp protect
Diffstat (limited to 'ghc/rts/MBlock.h')
| -rw-r--r-- | ghc/rts/MBlock.h | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/ghc/rts/MBlock.h b/ghc/rts/MBlock.h index 8ca6c5115c..a35b5630d1 100644 --- a/ghc/rts/MBlock.h +++ b/ghc/rts/MBlock.h @@ -1,12 +1,13 @@ /* ----------------------------------------------------------------------------- - * $Id: MBlock.h,v 1.11 2001/12/10 01:28:00 sebc Exp $ + * $Id: MBlock.h,v 1.12 2002/01/21 17:18:43 sof Exp $ * * (c) The GHC Team, 1998-1999 * * MegaBlock Allocator interface. * * ---------------------------------------------------------------------------*/ - +#ifndef __MBLOCK_H__ +#define __MBLOCK_H__ extern lnat mblocks_allocated; #ifdef ENABLE_WIN32_DLL_SUPPORT @@ -63,3 +64,5 @@ extern void * getMBlocks(nat n); #error Dont know where to get memory from on this architecture /* ToDo: memory locations on other architectures */ #endif + +#endif |