Skip to content
Snippets Groups Projects
Commit a8ae9fd2 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Follow SET_ARR_HDR change

parent 131338f8
No related branches found
No related tags found
No related merge requests found
...@@ -74,7 +74,7 @@ stgAllocForGMP (size_t size_in_bytes) ...@@ -74,7 +74,7 @@ stgAllocForGMP (size_t size_in_bytes)
/* allocate and fill it in. */ /* allocate and fill it in. */
arr = (StgArrWords *)allocate(rts_unsafeGetMyCapability(), total_size_in_words); 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 */ /* and return a ptr to the goods inside the array */
return arr->payload; return arr->payload;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment