diff --git a/.config/dotnet-tools.json b/.config/dotnet-tools.json index 3f893a08..1b200ded 100644 --- a/.config/dotnet-tools.json +++ b/.config/dotnet-tools.json @@ -9,7 +9,7 @@ ] }, "fable": { - "version": "4.0.0-theta-015", + "version": "4.0.0-theta-018", "commands": [ "fable" ] diff --git a/tests/FsToolkit.ErrorHandling.Tests/Expect.fs b/tests/FsToolkit.ErrorHandling.Tests/Expect.fs index b7a407a7..812c38e0 100644 --- a/tests/FsToolkit.ErrorHandling.Tests/Expect.fs +++ b/tests/FsToolkit.ErrorHandling.Tests/Expect.fs @@ -20,36 +20,36 @@ module Expect = #if FABLE_COMPILER - let inline isOk x message = + let isOk x message = match x with | Ok _ -> () | Result.Error x -> Tests.failtestf "%s. Expected Ok, was Error(%A)." message x #endif - let inline hasErrorValue v x = + let hasErrorValue v x = match x with | Ok x -> Tests.failtestf "Expected Error, was Ok(%A)." x | Error x when x = v -> () | Error x -> Tests.failtestf "Expected Error(%A), was Error(%A)." v x - let inline hasOkValue v x = + let hasOkValue v x = match x with | Ok x when x = v -> () | Ok x -> Tests.failtestf "Expected Ok(%A), was Ok(%A)." v x | Error x -> Tests.failtestf "Expected Ok, was Error(%A)." x - let inline hasSomeValue v x = + let hasSomeValue v x = match x with | Some x when x = v -> () | Some x -> Tests.failtestf "Expected Some(%A), was Some(%A)." v x | None -> Tests.failtestf "Expected Some, was None." - let inline hasNoneValue x = + let hasNoneValue x = match x with | None -> () | Some _ -> Tests.failtestf "Expected None, was Some." - let inline hasAsyncValue v asyncX = async { + let hasAsyncValue v asyncX = async { let! x = asyncX if v = x then @@ -58,22 +58,22 @@ module Expect = Tests.failtestf "Expected %A, was %A." v x } - let inline hasAsyncOkValue v asyncX = async { + let hasAsyncOkValue v asyncX = async { let! x = asyncX hasOkValue v x } - let inline hasAsyncErrorValue v asyncX = async { + let hasAsyncErrorValue v asyncX = async { let! x = asyncX hasErrorValue v x } - let inline hasAsyncSomeValue v asyncX = async { + let hasAsyncSomeValue v asyncX = async { let! x = asyncX hasSomeValue v x } - let inline hasAsyncNoneValue asyncX = async { + let hasAsyncNoneValue asyncX = async { let! x = asyncX hasNoneValue x }