X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FSanity.h;h=65d70539b0773114c03c2cd6d1ff2a0e252bb9ea;hb=54e6de853bd5260389006e75d661877ef1ea951d;hp=b86dc97aa5cd59f70b03d6b0142cc2290d59a3e9;hpb=c1580e72e315576b5f58427f1c29f268b565e95e;p=ghc-hetmet.git

diff --git a/rts/Sanity.h b/rts/Sanity.h
index b86dc97..65d7053 100644
--- a/rts/Sanity.h
+++ b/rts/Sanity.h
@@ -20,7 +20,7 @@
 /* debugging routines */
 extern void checkHeap      ( bdescr *bd );
 extern void checkHeapChunk ( StgPtr start, StgPtr end );
-extern void checkChain     ( bdescr *bd );
+extern void checkLargeObjects ( bdescr *bd );
 extern void checkTSO       ( StgTSO* tso );
 extern void checkGlobalTSOList ( rtsBool checkTSOs );
 extern void checkStaticObjects ( StgClosure* static_objects );
@@ -29,7 +29,7 @@ extern StgOffset checkStackFrame ( StgPtr sp );
 extern StgOffset checkClosure  ( StgClosure* p );
 
 extern void checkMutableList   ( bdescr *bd, nat gen );
-extern void checkMutableLists (void);
+extern void checkMutableLists ( rtsBool checkTSOs );
 
 #if defined(GRAN)
 extern void checkTSOsSanity(void);