Commit ae75dfb8 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Replace an (incorrect) bytes-to-words calculation with ROUNDUP_BYTES_TO_WDS

parent 17c8229a
......@@ -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 */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment