Andreas Klebinger pushed to branch wip/andreask/9.10.4-batch1 at Glasgow Haskell Compiler / GHC Commits: 381d513d by Andreas Klebinger at 2026-05-26T10:07:14+02:00 rts: CCS.h - Backport CCS_SYSTEM_OR_NULL macro - - - - - 1 changed file: - rts/include/rts/prof/CCS.h Changes: ===================================== rts/include/rts/prof/CCS.h ===================================== @@ -220,9 +220,14 @@ extern CostCentre * RTS_VAR(CC_LIST); // registered CC list #define CCS_ALLOC(ccs, size) (ccs)->mem_alloc += ((size)-sizeofW(StgProfHeader)) #define ENTER_CCS_THUNK(cap,p) cap->r.rCCCS = p->header.prof.ccs +/* Allow using CCS_SYSTEM somewhat consistently with/without profiling mode */ +#define CCS_SYSTEM_OR_NULL CCS_SYSTEM + #else /* !PROFILING */ #define CCS_ALLOC(ccs, amount) doNothing() #define ENTER_CCS_THUNK(cap,p) doNothing() +#define CCS_SYSTEM_OR_NULL NULL + #endif /* PROFILING */ View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/381d513d5d7d88409bc8dce211068b40... -- View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/381d513d5d7d88409bc8dce211068b40... You're receiving this email because of your account on gitlab.haskell.org.