21 lines
540 B
FSharp
21 lines
540 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 6f0c515..030e391 100644
|
|
--- a/Example.Tests/Calculator.fs
|
|
+++ b/Example.Tests/Calculator.fs
|
|
@@ -1,4 +1,4 @@
|
|
namespace Example
|
|
|
|
module Calculator =
|
|
- let addOne value = value + 1
|
|
+ let addOne value = value - 1
|
|
""")>]
|
|
member _.AddOne_increments() = Assert.Equal(42, Calculator.addOne 41)
|