Skip to content

Commit 5dfdca4

Browse files
committed
Rename afterIO to finallyIO in the fold module
1 parent f0c0e7d commit 5dfdca4

1 file changed

Lines changed: 5 additions & 5 deletions

File tree

core/src/Streamly/Internal/Data/Fold/Exception.hs

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -9,9 +9,9 @@
99
module Streamly.Internal.Data.Fold.Exception
1010
(
1111
-- * Resources
12-
afterIO
13-
, before
12+
before
1413
, bracketIO
14+
, finallyIO
1515

1616
-- * Exceptions
1717
, onException
@@ -163,9 +163,9 @@ bracketIO bef aft bet = Fold step initial extract final
163163
-- | Run a side effect whenever the fold stops normally, aborts due to an
164164
-- exception or is garbage collected.
165165
--
166-
{-# INLINE afterIO #-}
167-
afterIO :: (MonadIO m, MonadCatch m) => IO b -> Fold m a b -> Fold m a b
168-
afterIO aft (Fold step1 initial1 extract1 final1) =
166+
{-# INLINE finallyIO #-}
167+
finallyIO :: (MonadIO m, MonadCatch m) => IO b -> Fold m a b -> Fold m a b
168+
finallyIO aft (Fold step1 initial1 extract1 final1) =
169169
Fold step initial extract final
170170

171171
where

0 commit comments

Comments
 (0)