summaryrefslogtreecommitdiff
path: root/rts/Adjustor.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Adjustor.c')
-rw-r--r--rts/Adjustor.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Adjustor.c b/rts/Adjustor.c
index ca157661e8..5f047b3db1 100644
--- a/rts/Adjustor.c
+++ b/rts/Adjustor.c
@@ -137,7 +137,7 @@ createAdjustor (int cconv,
{
ffi_cif *cif;
ffi_type **arg_types;
- nat n_args, i;
+ uint32_t n_args, i;
ffi_type *result_type;
ffi_closure *cl;
int r, abi;
@@ -251,7 +251,7 @@ static void *
stgAllocStable(size_t size_in_bytes, StgStablePtr *stable)
{
StgArrBytes* arr;
- nat data_size_in_words, total_size_in_words;
+ uint32_t data_size_in_words, total_size_in_words;
/* round up to a whole number of words */
data_size_in_words = ROUNDUP_BYTES_TO_WDS(size_in_bytes);