[project @ 1998-12-02 13:17:09 by simonm]
[ghc-hetmet.git] / ghc / rts / StoragePriv.h
1 /* -----------------------------------------------------------------------------
2  * $Id: StoragePriv.h,v 1.2 1998/12/02 13:28:59 simonm Exp $
3  *
4  * Internal Storage Manger Interface
5  *
6  * ---------------------------------------------------------------------------*/
7
8 extern bdescr *allocNursery (bdescr *last_bd, nat blocks);
9 extern void newCAF(StgClosure*);
10 extern StgTSO *relocate_TSO(StgTSO *src, StgTSO *dest);
11
12 extern StgWeak    *weak_ptr_list;
13 extern StgClosure *caf_list;
14
15 extern bdescr *small_alloc_list;
16 extern bdescr *large_alloc_list;
17
18 extern StgPtr alloc_Hp;
19 extern StgPtr alloc_HpLim;
20
21 extern bdescr *nursery;
22
23 extern nat nursery_blocks;
24 extern nat alloc_blocks;
25 extern nat alloc_blocks_lim;
26