Skip to content

Commit 2966912

Browse files
committed
Make 'finally' polymorphic in 2nd argument.
1 parent 57a0cc2 commit 2966912

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Control/Monad/Aff.purs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -107,7 +107,7 @@ module Control.Monad.Aff
107107
apathize a = const unit <$> attempt a
108108

109109
-- | Compute `aff1`, followed by `aff2` regardless of whether `aff1` terminated successfully.
110-
finally :: forall e a. Aff e a -> Aff e Unit -> Aff e a
110+
finally :: forall e a b. Aff e a -> Aff e b -> Aff e a
111111
finally aff1 aff2 = do
112112
x <- attempt aff1
113113
aff2

0 commit comments

Comments
 (0)