Skip to content

Commit

Permalink
Prepare release v0.5.8.0
Browse files Browse the repository at this point in the history
  • Loading branch information
July541 committed Aug 25, 2024
1 parent 7d5b787 commit 515febb
Show file tree
Hide file tree
Showing 3 changed files with 27 additions and 16 deletions.
28 changes: 14 additions & 14 deletions Data/Array/Base.hs
Original file line number Diff line number Diff line change
Expand Up @@ -388,7 +388,7 @@ ixmap (l,u) f arr =

-- | Lazy right-associative fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldrArray :: (IArray a e, Ix i) => (e -> b -> b) -> b -> a i e -> b
foldrArray f z = \a ->
let !n = numElements a
Expand All @@ -399,7 +399,7 @@ foldrArray f z = \a ->

-- | Strict accumulating left-associative fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldlArray' :: (IArray a e, Ix i) => (b -> e -> b) -> b -> a i e -> b
foldlArray' f z0 = \a ->
let !n = numElements a
Expand All @@ -410,7 +410,7 @@ foldlArray' f z0 = \a ->

-- | Lazy left-associative fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldlArray :: (IArray a e, Ix i) => (b -> e -> b) -> b -> a i e -> b
foldlArray f z = \a ->
let !n = numElements a
Expand All @@ -421,7 +421,7 @@ foldlArray f z = \a ->

-- | Strict accumulating right-associative fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldrArray' :: (IArray a e, Ix i) => (e -> b -> b) -> b -> a i e -> b
foldrArray' f z0 = \a ->
let !n = numElements a
Expand All @@ -433,22 +433,22 @@ foldrArray' f z0 = \a ->
-- | Map elements to applicative actions, sequence them left-to-right, and
-- discard the results.
--
-- @since FIXME
-- @since 0.5.8.0
traverseArray_
:: (IArray a e, Ix i, Applicative f) => (e -> f b) -> a i e -> f ()
traverseArray_ f = foldrArray (\x z -> f x *> z) (pure ())
{-# INLINE traverseArray_ #-}

-- | @forArray_@ is 'traverseArray_' with its arguments flipped.
--
-- @since FIXME
-- @since 0.5.8.0
forArray_ :: (IArray a e, Ix i, Applicative f) => a i e -> (e -> f b) -> f ()
forArray_ = flip traverseArray_
{-# INLINE forArray_ #-}

-- | Strict accumulating left-associative monadic fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldlArrayM'
:: (IArray a e, Ix i, Monad m) => (b -> e -> m b) -> b -> a i e -> m b
foldlArrayM' f z0 = \a ->
Expand All @@ -462,7 +462,7 @@ foldlArrayM' f z0 = \a ->

-- | Strict accumulating right-associative monadic fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldrArrayM'
:: (IArray a e, Ix i, Monad m) => (e -> b -> m b) -> b -> a i e -> m b
foldrArrayM' f z0 = \a ->
Expand Down Expand Up @@ -1114,21 +1114,21 @@ mapIndices (l',u') f marr = do

-- | Strict accumulating left-associative fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldlMArray' :: (MArray a e m, Ix i) => (b -> e -> b) -> b -> a i e -> m b
foldlMArray' f = foldlMArrayM' (\z x -> pure (f z x))
{-# INLINE foldlMArray' #-}

-- | Strict accumulating right-associative fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldrMArray' :: (MArray a e m, Ix i) => (e -> b -> b) -> b -> a i e -> m b
foldrMArray' f = foldrMArrayM' (\x z -> pure (f x z))
{-# INLINE foldrMArray' #-}

-- | Strict accumulating left-associative monadic fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldlMArrayM' :: (MArray a e m, Ix i) => (b -> e -> m b) -> b -> a i e -> m b
foldlMArrayM' f z0 = \a -> do
!n <- getNumElements a
Expand All @@ -1142,7 +1142,7 @@ foldlMArrayM' f z0 = \a -> do

-- | Strict accumulating right-associative monadic fold.
--
-- @since FIXME
-- @since 0.5.8.0
foldrMArrayM' :: (MArray a e m, Ix i) => (e -> b -> m b) -> b -> a i e -> m b
foldrMArrayM' f z0 = \a -> do
!n <- getNumElements a
Expand All @@ -1157,7 +1157,7 @@ foldrMArrayM' f z0 = \a -> do
-- | Map elements to monadic actions, sequence them left-to-right, and discard
-- the results.
--
-- @since FIXME
-- @since 0.5.8.0
mapMArrayM_ :: (MArray a e m, Ix i) => (e -> m b) -> a i e -> m ()
mapMArrayM_ f = \a -> do
!n <- getNumElements a
Expand All @@ -1171,7 +1171,7 @@ mapMArrayM_ f = \a -> do

-- | @forMArrayM_@ is 'mapMArrayM_' with its arguments flipped.
--
-- @since FIXME
-- @since 0.5.8.0
forMArrayM_ :: (MArray a e m, Ix i) => a i e -> (e -> m b) -> m ()
forMArrayM_ = flip mapMArrayM_
{-# INLINE forMArrayM_ #-}
Expand Down
2 changes: 1 addition & 1 deletion array.cabal
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
cabal-version: >= 1.10
name: array
version: 0.5.6.0
version: 0.5.8.0

-- NOTE: Don't forget to update ./changelog.md
license: BSD3
Expand Down
13 changes: 12 additions & 1 deletion changelog.md
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
# Changelog for [`array` package](http://hackage.haskell.org/package/array)

## Next release
## 0.5.8.0 *Aug 2024*

### Added

Expand All @@ -9,6 +9,17 @@
* Folds for mutable arrays: `foldlMArray'`, `foldrMArray'`, `mapMArrayM_`,
`forMArrayM_`, `foldlMArrayM'`, `foldrMArrayM'`.

### Fixed

* Fix a build error that the package can't be buildable before `base-4.14`.

## 0.5.7.0 *April 2024*

### Changed

* `MArray` now has a `MINIMAL` pragma
* Optimisation of `newListArray` and `newGenArray`

## 0.5.6.0 *July 2023*

### Changed
Expand Down

0 comments on commit 515febb

Please sign in to comment.