Follow SET_ARR_HDR change
authorIan Lynagh <igloo@earth.li>
Sat, 19 Jun 2010 23:53:32 +0000 (23:53 +0000)
committerIan Lynagh <igloo@earth.li>
Sat, 19 Jun 2010 23:53:32 +0000 (23:53 +0000)
cbits/alloc.c

index e1320a9..5ddfcc4 100644 (file)
@@ -74,7 +74,7 @@ stgAllocForGMP (size_t size_in_bytes)
 
   /* allocate and fill it in. */
   arr = (StgArrWords *)allocate(rts_unsafeGetMyCapability(), total_size_in_words);
-  SET_ARR_HDR(arr, &stg_ARR_WORDS_info, CCCS, data_size_in_words);
+  SET_ARR_HDR(arr, &stg_ARR_WORDS_info, CCCS, size_in_bytes);
 
   /* and return a ptr to the goods inside the array */
   return arr->payload;