diff options
author | buggymcbugfix <4444-buggymcbugfix@users.noreply.gitlab.haskell.org> | 2020-08-31 19:47:59 +0200 |
---|---|---|
committer | buggymcbugfix <4444-buggymcbugfix@users.noreply.gitlab.haskell.org> | 2020-08-31 19:47:59 +0200 |
commit | ab78a80b22e44fe68ba083354d0f164998032ca0 (patch) | |
tree | 294684cf5bae6c6938d5738f0ed858f9a9255246 | |
parent | 9784a81dfba8cf48a9aa1ef9f65e7f71d469cc0a (diff) | |
download | haskell-wip/buggymcbugfix/appendArrays.tar.gz |
Point to related codewip/buggymcbugfix/appendArrays
-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; |