[project @ 2005-02-10 13:01:52 by simonmar]
[ghc-hetmet.git] / ghc / rts / Sanity.h
index 892c74b..c527cbb 100644 (file)
@@ -26,8 +26,7 @@ extern void checkStackChunk    ( StgPtr sp, StgPtr stack_end );
 extern StgOffset checkStackFrame ( StgPtr sp );
 extern StgOffset checkClosure  ( StgClosure* p );
 
-extern void checkMutableList   ( StgMutClosure *p, nat gen );
-extern void checkMutOnceList   ( StgMutClosure *p, nat gen );
+extern void checkMutableList   ( bdescr *bd, nat gen );
 
 #if defined(GRAN)
 extern void checkTSOsSanity(void);