Skip to content

Commit 21f4a0b

Browse files
committed
Add Task.result and same for ValueTask
1 parent d35fb08 commit 21f4a0b

File tree

2 files changed

+8
-3
lines changed

2 files changed

+8
-3
lines changed

src/FSharpPlus/Extensions/Task.fs

+1-1
Original file line numberDiff line numberDiff line change
@@ -286,7 +286,7 @@ module Task =
286286
(fun () -> if not (isNull (box disp)) then disp.Dispose ())
287287

288288
/// Creates a Task from a value
289-
let ofValue value = Task.FromResult value
289+
let result value = Task.FromResult value
290290

291291
/// Raises an exception in the Task
292292
let raise (e: exn) =

src/FSharpPlus/Extensions/ValueTask.fs

+7-2
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
namespace FSharpPlus
22

3-
#if NETSTANDARD2_1 && !FABLE_COMPILER
3+
#if NETSTANDARD2_1_OR_GREATER && !FABLE_COMPILER
44

55
/// Additional operations on ValueTask<'T>
66
[<RequireQualifiedAccess>]
@@ -109,9 +109,14 @@ module ValueTask =
109109
Unchecked.defaultof<_>
110110
else
111111
new ValueTask (source.AsTask ())
112-
112+
113113

114114
/// Raises an exception in the ValueTask
115115
let raise (``exception``: exn) = ValueTask<'TResult> (Task.FromException<'TResult> ``exception``)
116116

117+
118+
#if NET5_0_OR_GREATER
119+
/// Creates a ValueTask from a value
120+
let result value = ValueTask.FromResult value
121+
#endif
117122
#endif

0 commit comments

Comments
 (0)