diff options
author | Nicolas Trangez <ikke@nicolast.be> | 2022-10-31 00:10:50 +0100 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-11-02 12:06:48 -0400 |
commit | c235b399d094af3b706eb5a4bf15712fe5e4f795 (patch) | |
tree | 6aa853a3dfc46fbfaf55e89b2f75906833f886df | |
parent | 99a1d896bca1c2e1068646eed50b02314673236c (diff) | |
download | haskell-c235b399d094af3b706eb5a4bf15712fe5e4f795.tar.gz |
rts: tag `stgStrndup` as `STG_MALLOC`
See: https://gitlab.haskell.org/ghc/ghc/-/issues/22381
-rw-r--r-- | rts/RtsUtils.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/RtsUtils.h b/rts/RtsUtils.h index 7f7e925cd4..1c5aac82a1 100644 --- a/rts/RtsUtils.h +++ b/rts/RtsUtils.h @@ -45,7 +45,8 @@ void *stgCallocBytes(size_t count, size_t size, char *msg) STG_ALLOC_SIZE2(1, 2) STG_RETURNS_NONNULL; -char *stgStrndup(const char *s, size_t n); +char *stgStrndup(const char *s, size_t n) + STG_MALLOC STG_MALLOC1(stgFree); /* ----------------------------------------------------------------------------- * Misc other utilities |