mirror of
https://github.com/Smaug123/unofficial-nunit-runner
synced 2025-10-06 01:48:38 +00:00
Generalise Spectre to arbitrary console (#78)
This commit is contained in:
@@ -4,6 +4,7 @@ open System
|
||||
open System.IO
|
||||
open System.Reflection
|
||||
open System.Runtime.Loader
|
||||
open Spectre.Console
|
||||
|
||||
// Fix for https://github.com/Smaug123/unofficial-nunit-runner/issues/8
|
||||
// Set AppContext.BaseDirectory to where the test DLL is.
|
||||
@@ -61,7 +62,12 @@ module Program =
|
||||
| Some filter -> Filter.shouldRun filter
|
||||
| None -> fun _ _ -> true
|
||||
|
||||
let progress = Progress.spectre ()
|
||||
let stderr =
|
||||
let consoleSettings = AnsiConsoleSettings ()
|
||||
consoleSettings.Out <- AnsiConsoleOutput Console.Error
|
||||
AnsiConsole.Create consoleSettings
|
||||
|
||||
let progress = Progress.spectre stderr
|
||||
|
||||
use _ = new SetBaseDir (testDll)
|
||||
|
||||
|
@@ -4,21 +4,21 @@ open Spectre.Console
|
||||
|
||||
[<RequireQualifiedAccess>]
|
||||
module Progress =
|
||||
let spectre () : ITestProgress =
|
||||
let spectre (console : IAnsiConsole) : ITestProgress =
|
||||
{ new ITestProgress with
|
||||
member _.OnTestFailed name failure =
|
||||
AnsiConsole.Console.MarkupLine
|
||||
console.MarkupLine
|
||||
$"[red]Test '%s{Markup.Escape name}' failed: %s{Markup.Escape (failure.ToString ())}[/]"
|
||||
|
||||
member _.OnTestFixtureStart name testCount =
|
||||
AnsiConsole.Console.MarkupLine $"[white]Running tests: %s{Markup.Escape name}[/]"
|
||||
console.MarkupLine $"[white]Running tests: %s{Markup.Escape name}[/]"
|
||||
|
||||
member _.OnTestMemberFinished name =
|
||||
AnsiConsole.Console.MarkupLine $"[gray]Finished test: %s{Markup.Escape name}[/]"
|
||||
console.MarkupLine $"[gray]Finished test: %s{Markup.Escape name}[/]"
|
||||
|
||||
member _.OnTestMemberSkipped name =
|
||||
AnsiConsole.Console.MarkupLine $"[yellow]Skipping test due to filter: %s{Markup.Escape name}[/]"
|
||||
console.MarkupLine $"[yellow]Skipping test due to filter: %s{Markup.Escape name}[/]"
|
||||
|
||||
member _.OnTestMemberStart name =
|
||||
AnsiConsole.Console.MarkupLine $"[white]Running test: %s{Markup.Escape name}[/]"
|
||||
console.MarkupLine $"[white]Running test: %s{Markup.Escape name}[/]"
|
||||
}
|
||||
|
Reference in New Issue
Block a user