svenvanheugten/mutannot
1
0
Fork 0
Code Issues Pull requests 1 Projects Releases Packages Wiki Activity Actions

Rewrite #1

Open
svenvanheugten wants to merge 23 commits from mutannot-rewrite into main
pull from: mutannot-rewrite
merge into: svenvanheugten:main
Conversation 0 Commits 23 Files changed 17 +2 -2
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files
Showing only changes of commit 63d0219e9e - Show all commits

4
Mutannot/Program.fs
View file

@ -79,7 +79,7 @@ let getMetadataLoadContext (assemblyPath: string) =
new MetadataLoadContext(pathAssemblyResolver, typeof<obj>.Assembly.GetName().Name) new MetadataLoadContext(pathAssemblyResolver, typeof<obj>.Assembly.GetName().Name)
let unindented (s: string) = let unindentPatch (s: string) =
let lines = s.Split([| "\r\n"; "\n" |], StringSplitOptions.None) let lines = s.Split([| "\r\n"; "\n" |], StringSplitOptions.None)
let indexOfFirstNonEmptyLine = let indexOfFirstNonEmptyLine =
@ -114,7 +114,7 @@ let getMutationCases projectPath =
| "Mutannot.MutationCaseAttribute" -> | "Mutannot.MutationCaseAttribute" ->
Some Some
{ TestName = $"{m.DeclaringType.FullName}.{m.Name}" { TestName = $"{m.DeclaringType.FullName}.{m.Name}"
Patch = attr.ConstructorArguments[0].Value :?> string |> unindented } Patch = attr.ConstructorArguments[0].Value :?> string |> unindentPatch }
| _ -> None)) | _ -> None))
|> Seq.toList |> Seq.toList