diff options
| author | Tomas Carnecky <tomas.carnecky@gmail.com> | 2016-05-08 14:44:07 +0200 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2016-05-10 08:40:50 +0200 |
| commit | 260a5648c299636a94b12b9b97bf9743b0a1496d (patch) | |
| tree | 2de1ffe579d1558d4352e496cf2e53b907e954d1 /rts/sm | |
| parent | dd3e84701db7d05a6664aa5826732da3ee8ce265 (diff) | |
| download | haskell-260a5648c299636a94b12b9b97bf9743b0a1496d.tar.gz | |
Use stdint types for Stg{Word,Int}{8,16,32,64}
We can't define Stg{Int,Word} in terms of {,u}intptr_t because STG
depends on them being the exact same size as void*, and {,u}intptr_t
does not make that guarantee. Furthermore, we also need to define
StgHalf{Int,Word}, so the preprocessor if needs to stay. But we can at
least keep it in a single place instead of repeating it in various
files.
Also define STG_{INT,WORD}{8,16,32,64}_{MIN,MAX} and use it in HsFFI.h,
further reducing the need for CPP in other files.
Reviewers: austin, bgamari, simonmar, hvr, erikd
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D2182
Diffstat (limited to 'rts/sm')
| -rw-r--r-- | rts/sm/Sanity.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c index d1ed7db977..794bce7491 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -821,7 +821,7 @@ void findSlop(bdescr *bd) for (; bd != NULL; bd = bd->link) { slop = (bd->blocks * BLOCK_SIZE_W) - (bd->free - bd->start); if (slop > (1024/sizeof(W_))) { - debugBelch("block at %p (bdescr %p) has %" FMT_SizeT "KB slop\n", + debugBelch("block at %p (bdescr %p) has %" FMT_Word "KB slop\n", bd->start, bd, slop / (1024/sizeof(W_))); } } |