File tree Expand file tree Collapse file tree 4 files changed +6
-2
lines changed
Expand file tree Collapse file tree 4 files changed +6
-2
lines changed Original file line number Diff line number Diff line change @@ -10,6 +10,8 @@ open FSharpx.Functional
1010open FSharpx
1111open Microsoft.FSharp .Control .WebExtensions
1212
13+ #nowarn " FS0044"
14+
1315[<assembly: Extension>]
1416do ()
1517
Original file line number Diff line number Diff line change @@ -59,9 +59,9 @@ let ChoiceFolding() =
5959 actions |> Choice.foldM folder startingPosition
6060
6161 match finalPosition with
62- | Validation.Success ( x, y) ->
62+ | Choice1Of2 ( x, y) ->
6363 printfn " final position: %f ,%f " x y
64- | Validation.Failure error ->
64+ | Choice2Of2 error ->
6565 printfn " error: %s " error
6666 Assert.Fail( " should not have failed: {0}" , error)
6767
Original file line number Diff line number Diff line change @@ -9,6 +9,7 @@ open FSharpx
99open FSharpx.Functional
1010open FSharpx.Collections
1111open FSharpx.Choice
12+ #nowarn " FS0044"
1213open FSharpx.Validation
1314
1415// First let's define a domain.
Original file line number Diff line number Diff line change @@ -8,6 +8,7 @@ open FSharpx.CSharpTests
88open FSharpx
99open FSharpx.Functional
1010open FSharpx.Choice
11+ #nowarn " FS0044"
1112open FSharpx.Validation
1213open FSharpx.Nullable
1314open NUnit.Framework
You can’t perform that action at this time.
0 commit comments