We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent dd7fca9 commit c2517bdCopy full SHA for c2517bd
Data/HashMap/Internal/Array.hs
@@ -347,7 +347,7 @@ copyM !src !_sidx@(I# sidx#) !dst !_didx@(I# didx#) _n@(I# n#) =
347
348
cloneM :: MArray s a -> Int -> Int -> ST s (MArray s a)
349
cloneM _mary@(MArray mary#) _off@(I# off#) _len@(I# len#) =
350
- CHECK_BOUNDS("cloneM_off", lengthM _mary, _off)
+ CHECK_BOUNDS("cloneM_off", lengthM _mary, _off - 1)
351
CHECK_BOUNDS("cloneM_end", lengthM _mary, _off + _len - 1)
352
ST $ \ s ->
353
case cloneMutableArray# mary# off# len# s of
0 commit comments