summaryrefslogtreecommitdiff
path: root/rts/Globals.c
diff options
context:
space:
mode:
authorErik de Castro Lopo <erikd@mega-nerd.com>2016-05-02 06:37:14 +1000
committerErik de Castro Lopo <erikd@mega-nerd.com>2016-05-05 08:29:27 +1000
commitdb9de7eb3e91820024f673bfdb6fb8064cfed20d (patch)
tree5e1c3ef0b6dee7f40fedbc118ba36cfe6ffdd1ee /rts/Globals.c
parentad4392c142696d5092533480a82ed65322e9d413 (diff)
downloadhaskell-db9de7eb3e91820024f673bfdb6fb8064cfed20d.tar.gz
rts: Replace `nat` with `uint32_t`
The `nat` type was an alias for `unsigned int` with a comment saying it was at least 32 bits. We keep the typedef in case client code is using it but mark it as deprecated. Test Plan: Validated on Linux, OS X and Windows Reviewers: simonmar, austin, thomie, hvr, bgamari, hsyl20 Differential Revision: https://phabricator.haskell.org/D2166
Diffstat (limited to 'rts/Globals.c')
-rw-r--r--rts/Globals.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Globals.c b/rts/Globals.c
index 2e4b99474f..4b899b15ba 100644
--- a/rts/Globals.c
+++ b/rts/Globals.c
@@ -45,7 +45,7 @@ static StgStablePtr store[MaxStoreKey];
void
initGlobalStore(void)
{
- nat i;
+ uint32_t i;
for (i=0; i < MaxStoreKey; i++) {
store[i] = 0;
}
@@ -57,7 +57,7 @@ initGlobalStore(void)
void
exitGlobalStore(void)
{
- nat i;
+ uint32_t i;
#ifdef THREADED_RTS
closeMutex(&globalStoreLock);
#endif