From 0131bb7fff2cf76d55f51cbf81d159a6c43ab253 Mon Sep 17 00:00:00 2001
From: Sven Tennie <sven.tennie@gmail.com>
Date: Mon, 8 May 2023 18:22:59 +0000
Subject: [PATCH] Make checkSTACK() public

Such that it can also be used in tests.
---
 rts/sm/Sanity.c | 4 +---
 rts/sm/Sanity.h | 1 +
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index 7ccf4f8c6de4..2ad0c185b6aa 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 b6f205438317..8e680bb388ba 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 */
-- 
GitLab