1
1
mirror of https://github.com/tweag/ormolu.git synced 2024-10-06 01:47:10 +03:00

Make test suite failures a bit more readable

This commit is contained in:
mrkkrp 2019-06-09 14:02:19 +02:00 committed by Mark Karpov
parent 046f14e7e5
commit c421b22832

View File

@ -66,9 +66,9 @@ deriveOutput path = parseRelFile $
shouldMatch :: Bool -> Text -> Text -> Expectation
shouldMatch idempotencyTest actual expected =
when (actual /= expected) . expectationFailure $ unlines
[ "expected (" ++ pass ++ "):"
[ ">>>>>>>>>>>>>>>>>>>>>> expected (" ++ pass ++ "):"
, T.unpack expected
, "but got:"
, ">>>>>>>>>>>>>>>>>>>>>> but got:"
, T.unpack actual
]
where