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 aa9f8ad commit c551c3cCopy full SHA for c551c3c
src/FsToolkit.ErrorHandling/AsyncResult.fs
@@ -23,6 +23,8 @@ module AsyncResult =
23
let foldResult onSuccess onError ar =
24
Async.map (Result.fold onSuccess onError) ar
25
26
+#if !FABLE_COMPILER
27
+
28
let ofTask aTask =
29
aTask
30
|> Async.AwaitTask
@@ -34,7 +36,9 @@ module AsyncResult =
34
36
35
37
|> Async.Catch
38
|> Async.map Result.ofChoice
-
39
40
+#endif
41
42
let retn x =
43
Ok x
44
|> Async.singleton
0 commit comments