aboutsummaryrefslogtreecommitdiffstats
path: root/test/Spec.hs
diff options
context:
space:
mode:
authorJan Tuomi <jans.tuomi@gmail.com>2022-12-08 17:26:43 +0200
committerJan Tuomi <jans.tuomi@gmail.com>2022-12-08 17:27:57 +0200
commit29f1d1b22b240ee9ef3cf4b867bc7a663d8d3a6a (patch)
tree9bbf6c53a3782c48f679a02e93fbe46908f44d34 /test/Spec.hs
parent22a9ade3409b40f644a5b79fc6f1e5b06419c507 (diff)
Improve error reporting
Diffstat (limited to 'test/Spec.hs')
-rw-r--r--test/Spec.hs2
1 files changed, 1 insertions, 1 deletions
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\""])