27 lines
743 B
FSharp
27 lines
743 B
FSharp
namespace Example.Tests
|
|
|
|
open Example
|
|
open Mutannot
|
|
open Xunit
|
|
|
|
type CalculatorTests() =
|
|
[<Fact>]
|
|
[<MutationCase("""
|
|
diff --git a/Example.Tests/Calculator.fs b/Example.Tests/Calculator.fs
|
|
index cfcce3b..39be7f3 100644
|
|
--- a/Example.Tests/Calculator.fs
|
|
+++ b/Example.Tests/Calculator.fs
|
|
@@ -1,7 +1,7 @@
|
|
namespace Example
|
|
|
|
module Calculator =
|
|
- let addOne value = value + 1
|
|
+ let addOne value = value - 1
|
|
|
|
let absoluteDifference left right =
|
|
if left >= right then left - right else right - left
|
|
|
|
member _.AddOne_increments() =
|
|
Assert.Equal(42, Calculator.addOne 41)
|
|
""")>]
|
|
member _.AddOne_increments() = Assert.Equal(42, Calculator.addOne 41)
|