This commit is contained in:
George Thomas 2026-01-08 01:25:33 +00:00
parent 12e30085b0
commit 21dc7e96bc

View File

@ -24,7 +24,13 @@ main = do
-- terminalWidth <- Terminal.Size.width <<$>> Terminal.Size.size -- TODO this doesn't work in GHCID or GHCIWatch... -- terminalWidth <- Terminal.Size.width <<$>> Terminal.Size.size -- TODO this doesn't work in GHCID or GHCIWatch...
terminalWidth <- pure $ Just 62 terminalWidth <- pure $ Just 62
T.putStrLn $ drawTree $ getTestTree tests T.putStrLn $ drawTree $ getTestTree tests
TL.putStrLn . displayTestResultsConsole terminalWidth =<< runTests TestRunnerOpts{regenerateGoldenFiles = False} () tests TL.putStrLn . displayTestResultsConsole terminalWidth
=<< runTests
TestRunnerOpts
{ regenerateGoldenFiles = False
}
()
tests
tests :: TestTree IO () tests :: TestTree IO ()
tests = tests =