patrickaldis/garnet
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add extra context to test errors

Browse Source
This commit is contained in:
George Thomas 2026-01-14 00:58:06 +00:00
parent 19d402ec8f
commit ea3900dd93
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
haskell/Pre.hs
View File

@ -342,8 +342,8 @@ displayTestResultsConsole terminalWidth testResult =
<> displayLogs <> displayLogs
<> setColour Vivid Red <> setColour Vivid Red
<> indentAllLines indent case e of <> indentAllLines indent case e of
ExceptionFailure ex -> T.show ex ExceptionFailure ex -> "Exception: " <> T.show ex
AssertionFailure t -> T.stripEnd t AssertionFailure t -> "Assertion failed: " <> T.stripEnd t
GoldenMissing -> "Golden file missing" GoldenMissing -> "Golden file missing"
GoldenFailure{expected, actual} -> GoldenFailure{expected, actual} ->
"Expected:\n" <> T.stripEnd expected <> "\nActual:\n" <> T.stripEnd actual "Expected:\n" <> T.stripEnd expected <> "\nActual:\n" <> T.stripEnd actual