Compare commits
2 commits
91ab968154
...
8c7e227515
| Author | SHA1 | Date | |
|---|---|---|---|
| 8c7e227515 | |||
| 88db0ab12b |
2 changed files with 1 additions and 14 deletions
|
|
@ -1,13 +0,0 @@
|
||||||
namespace Mutannot
|
|
||||||
|
|
||||||
open System
|
|
||||||
|
|
||||||
[<AttributeUsage(AttributeTargets.Method, AllowMultiple = true)>]
|
|
||||||
type MutationCaseAttribute(id: string, file: string, line: int, find: string, replace: string) =
|
|
||||||
inherit Attribute()
|
|
||||||
|
|
||||||
member _.Id = id
|
|
||||||
member _.File = file
|
|
||||||
member _.Line = line
|
|
||||||
member _.Find = find
|
|
||||||
member _.Replace = replace
|
|
||||||
|
|
@ -80,7 +80,7 @@ let repoRoot =
|
||||||
|
|
||||||
let parseArgs (args: string list) =
|
let parseArgs (args: string list) =
|
||||||
let usage () =
|
let usage () =
|
||||||
fail "Usage: verify-coverage-mutants.fsx <path/to/project.fsproj> [--configuration Debug|Release] [--build-arg <value> ...] [--no-build] [--list | --show <id> | --run [id...]]"
|
fail "Usage: mutannot.fsx <path/to/project.fsproj> [--configuration Debug|Release] [--build-arg <value> ...] [--no-build] [--list | --show <id> | --run [id...]]"
|
||||||
|
|
||||||
let rec loop configuration projectPath buildArgs noBuild remaining =
|
let rec loop configuration projectPath buildArgs noBuild remaining =
|
||||||
match remaining with
|
match remaining with
|
||||||
Loading…
Add table
Add a link
Reference in a new issue