diff options
| -rw-r--r-- | rts/PrimOps.cmm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm index b343624872..7c790b3737 100644 --- a/rts/PrimOps.cmm +++ b/rts/PrimOps.cmm @@ -343,6 +343,7 @@ stg_thawArrayzh ( gcptr src, W_ offset, W_ n ) cloneArray(stg_MUT_ARR_PTRS_DIRTY_info, src, offset, n) } +// Closely follows the pattern of cloneArray in includes/Cmm.h stg_appendArrayszh( gcptr src1, gcptr src2 ) { W_ words, n1, n2, nDest, size1, size2; @@ -512,6 +513,7 @@ stg_thawSmallArrayzh ( gcptr src, W_ offset, W_ n ) cloneSmallArray(stg_SMALL_MUT_ARR_PTRS_DIRTY_info, src, offset, n) } +// Closely follows the pattern of cloneSmallArray in includes/Cmm.h stg_appendSmallArrayszh( gcptr src1, gcptr src2 ) { W_ words, n1, n2, nDest; |