1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team, 1998-1999
5 * Prototypes for functions in Sanity.c
7 * ---------------------------------------------------------------------------*/
14 #include "BeginPrivate.h"
17 # define PVM_PE_MASK 0xfffc0000
18 # define MAX_PVM_PES MAX_PES
19 # define MAX_PVM_TIDS MAX_PES
20 # define MAX_SLOTS 100000
23 /* debugging routines */
24 void checkSanity ( rtsBool check_heap );
25 void checkNurserySanity ( nursery *nursery );
26 void checkHeap ( bdescr *bd );
27 void checkHeapChunk ( StgPtr start, StgPtr end );
28 void checkLargeObjects ( bdescr *bd );
29 void checkTSO ( StgTSO* tso );
30 void checkGlobalTSOList ( rtsBool checkTSOs );
31 void checkStaticObjects ( StgClosure* static_objects );
32 void checkStackChunk ( StgPtr sp, StgPtr stack_end );
33 StgOffset checkStackFrame ( StgPtr sp );
34 StgOffset checkClosure ( StgClosure* p );
36 void checkMutableList ( bdescr *bd, nat gen );
37 void checkMutableLists ( rtsBool checkTSOs );
39 void checkRunQueue (Capability *cap);
41 void memInventory (rtsBool show);
43 void checkBQ (StgTSO *bqe, StgClosure *closure);
45 #include "EndPrivate.h"