diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-06-22 17:51:06 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-06-25 03:54:55 -0400 |
| commit | d3c2d59bafe253dd7e4966a46564fb16acb1af5c (patch) | |
| tree | da757ae9fd5a45674915c1e111990b45d839ede7 /rts/Capability.h | |
| parent | a788d4d17ad332dbfbe08e6822c52ae0de6ef496 (diff) | |
| download | haskell-d3c2d59bafe253dd7e4966a46564fb16acb1af5c.tar.gz | |
RTS: avoid overflow on 32-bit arch (#18375)
We're now correctly computing allocated bytes on 32-bit arch, so we get
huge increases.
Metric Increase:
haddock.Cabal
haddock.base
haddock.compiler
space_leak_001
Diffstat (limited to 'rts/Capability.h')
| -rw-r--r-- | rts/Capability.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Capability.h b/rts/Capability.h index 3078680aa6..82046c0b9e 100644 --- a/rts/Capability.h +++ b/rts/Capability.h @@ -114,7 +114,7 @@ struct Capability_ { // Total words allocated by this cap since rts start // See Note [allocation accounting] in Storage.c - W_ total_allocated; + uint64_t total_allocated; #if defined(THREADED_RTS) // Worker Tasks waiting in the wings. Singly-linked. |