diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index 7ccf4f8c6de4606bf43deead1929f4bf62c0871a..2ad0c185b6aa0cdbd3e00acc21a30c206ce0a4d8 100644
--- a/rts/sm/Sanity.c
+++ b/rts/sm/Sanity.c
@@ -42,7 +42,6 @@ int   isHeapAlloced       ( StgPtr p);
 static void  checkSmallBitmap    ( StgPtr payload, StgWord bitmap, uint32_t );
 static void  checkLargeBitmap    ( StgPtr payload, StgLargeBitmap*, uint32_t );
 static void  checkClosureShallow ( const StgClosure * );
-static void  checkSTACK          (StgStack *stack);
 
 static void  checkCompactObjects (bdescr *bd);
 
@@ -723,7 +722,7 @@ checkCompactObjects(bdescr *bd)
     }
 }
 
-static void
+void
 checkSTACK (StgStack *stack)
 {
     StgPtr sp = stack->sp;
@@ -1372,5 +1371,4 @@ memInventory (bool show)
 
 }
 
-
 #endif /* DEBUG */
diff --git a/rts/sm/Sanity.h b/rts/sm/Sanity.h
index b6f2054383177985a3f08a0342f980f183e5dc34..8e680bb388baa440cbca67879fa2e11e0a28eece 100644
--- a/rts/sm/Sanity.h
+++ b/rts/sm/Sanity.h
@@ -39,6 +39,7 @@ void memInventory (bool show);
 
 void checkBQ (StgTSO *bqe, StgClosure *closure);
 
+void checkSTACK (StgStack *stack);
 #include "EndPrivate.h"
 
 #endif /* DEBUG */