From 7b6e1e53ed1c4abc785f918600333dbe1de9b6f7 Mon Sep 17 00:00:00 2001
From: Sven Tennie <sven.tennie@gmail.com>
Date: Mon, 8 May 2023 18:26:07 +0000
Subject: [PATCH] Publish stack related fields in DerivedConstants.h
These will be used in ghc-heap to decode these parts of the stack.
---
utils/deriveConstants/Main.hs | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/utils/deriveConstants/Main.hs b/utils/deriveConstants/Main.hs
index c4a592957cbd..32e6ffbd1998 100644
--- a/utils/deriveConstants/Main.hs
+++ b/utils/deriveConstants/Main.hs
@@ -476,6 +476,7 @@ wanteds os = concat
,closureFieldOffset Both "StgStack" "stack"
,closureField C "StgStack" "stack_size"
,closureField C "StgStack" "dirty"
+ ,closureField C "StgStack" "marking"
,structSize C "StgTSOProfInfo"
@@ -485,6 +486,11 @@ wanteds os = concat
,closureField C "StgCatchFrame" "handler"
,closureField C "StgCatchFrame" "exceptions_blocked"
+ ,structSize C "StgRetFun"
+ ,fieldOffset C "StgRetFun" "size"
+ ,fieldOffset C "StgRetFun" "fun"
+ ,fieldOffset C "StgRetFun" "payload"
+
,closureSize C "StgPAP"
,closureField C "StgPAP" "n_args"
,closureFieldGcptr C "StgPAP" "fun"
--
GitLab