+ (Value)Task.mapError

Author: gusty

tests/FSharpPlus.Tests/Task.fs

@@ -357,7 +357,7 @@ module Task =
         module Task =
             let Yield () =
                 let ya = Task.Yield().GetAwaiter ()
-                let tcs = TaskCompletionSource<unit> TaskCreationOptions.RunContinuationsAsynchronously
+                let tcs = TaskCompletionSource<unit> tcsOptions
                 let k () = tcs.SetResult ()
                 ya.UnsafeOnCompleted (Action k) |> ignore
                 tcs.Task

tests/FSharpPlus.Tests/ValueTask.fs

@@ -276,7 +276,7 @@ module ValueTask =
         module ValueTask =
             let Yield () =
                 let ya = Task.Yield().GetAwaiter ()
-                let tcs = TaskCompletionSource<unit> TaskCreationOptions.RunContinuationsAsynchronously
+                let tcs = TaskCompletionSource<unit> tcsOptions
                 let k () = tcs.SetResult ()
                 ya.UnsafeOnCompleted (Action k) |> ignore
                 tcs.Task |> ValueTask<unit>