Skip to content

Commit db9c7fa

Browse files
author
Jamil Maqdis Anton
committed
Move Async module from ExceptionsHandler.fs to its own file.
1 parent f88e77c commit db9c7fa

File tree

1 file changed

+1
-4
lines changed

1 file changed

+1
-4
lines changed

src/ExceptionsHandler.fs

Lines changed: 1 addition & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,7 @@
11
namespace SqlStreamStore.FSharp
22

3-
module Async =
4-
let map f m = async.Bind(m, (f >> async.Return))
5-
63
module ExceptionsHandler =
7-
let asyncExceptionHandler (op: Async<'res>): Async<Result<'res, string>> =
4+
let asyncExceptionHandler (op: Async<'suc>): Async<Result<'suc, string>> =
85
op
96
|> Async.Catch
107
|> Async.map (function

0 commit comments

Comments
 (0)