From 29f1d1b22b240ee9ef3cf4b867bc7a663d8d3a6a Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Thu, 8 Dec 2022 17:26:43 +0200 Subject: Improve error reporting --- test/Spec.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'test/Spec.hs') diff --git a/test/Spec.hs b/test/Spec.hs index a17f344..d4d5bf9 100644 --- a/test/Spec.hs +++ b/test/Spec.hs @@ -23,7 +23,7 @@ parseTests = testGroup "parse" [ assertEqual "" expected got, do got <- expectErrorL M.empty $ parse (map makeNonsenseToken ["(", "+", "1", "2"]) - let expected = "unbalanced function call" + let expected = "error: unbalanced function call" assertEqual "" expected got, do (got, _) <- expectSuccessL M.empty $ parse (map makeNonsenseToken ["\"1000\n2000\n3000\""]) -- cgit v1.3