From ae75dfb80ccffcdb8d96d53508731214f7cb7305 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Sat, 19 Jun 2010 23:43:10 +0000 Subject: [PATCH] Replace an (incorrect) bytes-to-words calculation with ROUNDUP_BYTES_TO_WDS --- rts/Adjustor.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/Adjustor.c b/rts/Adjustor.c index dcae59b..dd974e2 100644 --- a/rts/Adjustor.c +++ b/rts/Adjustor.c @@ -220,7 +220,7 @@ stgAllocStable(size_t size_in_bytes, StgStablePtr *stable) nat data_size_in_words, total_size_in_words; /* round up to a whole number of words */ - data_size_in_words = (size_in_bytes + sizeof(W_) + 1) / sizeof(W_); + data_size_in_words = ROUNDUP_BYTES_TO_WDS(size_in_bytes); total_size_in_words = sizeofW(StgArrWords) + data_size_in_words; /* allocate and fill it in */ -- 1.7.10.4