shithub: MicroHs

Download patch

ref: e730831247664c2979740105badac56fb7803a9b
parent: fdb26350514c86ea3079aa9cb4a8e43090f4861d
author: Lennart Augustsson <lennart@augustsson.net>
date: Sat Jul 13 16:05:40 EDT 2024

Fix bad error test after Data.Map removal.

--- a/tests/errmsg.test
+++ b/tests/errmsg.test
@@ -83,18 +83,18 @@
 =====
 module E(lookup) where
 import Prelude
-import Data.Map
+import TestMap
 -----
-mhs: "../tmp/E.hs": line 2, col 10: ambiguous export: lookup [Data.List.lookup,Data.Map.lookup]
+mhs: "../tmp/E.hs": line 2, col 10: ambiguous export: lookup [Data.List.lookup,TestMap.lookup]
 
 =====
 module E() where
 import Prelude
-import Data.Map
+import TestMap
 a :: ()
 a = lookup
 -----
-mhs: "../tmp/E.hs": line 6, col 5: ambiguous value: lookup [Data.List.lookup,Data.Map.lookup]
+mhs: "../tmp/E.hs": line 6, col 5: ambiguous value: lookup [Data.List.lookup,TestMap.lookup]
 
 =====
 module E() where
--