diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2021-07-16 10:21:24 -0400 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-12-16 16:12:44 -0500 |
| commit | fbc842441fbd6ca2065b4e28af98197765350a73 (patch) | |
| tree | ad9c3475ab0f5327bcc69fb48b987b89f0a3d769 /rts/include | |
| parent | 914f002513752227149ce63e81f121bfee862cac (diff) | |
| download | haskell-fbc842441fbd6ca2065b4e28af98197765350a73.tar.gz | |
Introduce SET_INFO_RELEASE for Cmm
Diffstat (limited to 'rts/include')
| -rw-r--r-- | rts/include/Cmm.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/include/Cmm.h b/rts/include/Cmm.h index 932bfb903a..f688a68e4d 100644 --- a/rts/include/Cmm.h +++ b/rts/include/Cmm.h @@ -594,6 +594,7 @@ /* Getting/setting the info pointer of a closure */ #define SET_INFO(p,info) StgHeader_info(p) = info +#define SET_INFO_RELEASE(p,info) prim_write_barrier; StgHeader_info(p) = info #define GET_INFO(p) StgHeader_info(p) /* Determine the size of an ordinary closure from its info table */ |