Add location to the extra-constraints wildcard
[ghc.git] / testsuite / tests / partial-sigs / should_fail / WildcardInstantiations.stderr
index 29f700b..a6c2136 100644 (file)
@@ -1,45 +1,49 @@
 
-WildcardInstantiations.hs:5:14:
-    Found hole ‘_a’ with type: w_a
-    Where: ‘w_a’ is a rigid type variable bound by
-                 the inferred type of foo :: (Enum w_a, Show w_a) => w_a -> String
-                 at WildcardInstantiations.hs:6:1
-    To use the inferred type, enable PartialTypeSignatures
-    In the type signature for ‘foo’: (Show _a, _) => _a -> _
+WildcardInstantiations.hs:5:14: error:
+    • Found type wildcard ‘_a’ standing for ‘a’
+      Where: ‘a’ is a rigid type variable bound by
+               the inferred type of foo :: (Show a, Enum a) => a -> String
+               at WildcardInstantiations.hs:6:1-21
+      To use the inferred type, enable PartialTypeSignatures
+    • In the type signature: foo :: (Show _a, _) => _a -> _
 
-WildcardInstantiations.hs:5:18:
-    Found hole ‘_’ with inferred constraints: Enum w_a
-    To use the inferred type, enable PartialTypeSignatures
-    In the type signature for ‘foo’: (Show _a, _) => _a -> _
+WildcardInstantiations.hs:5:18: error:
+    • Found type wildcard ‘_’ standing for ‘Enum a’
+      Where: ‘a’ is a rigid type variable bound by
+               the inferred type of foo :: (Show a, Enum a) => a -> String
+               at WildcardInstantiations.hs:6:1-21
+      To use the inferred type, enable PartialTypeSignatures
+    • In the type signature: foo :: (Show _a, _) => _a -> _
 
-WildcardInstantiations.hs:5:30:
-    Found hole ‘_’ with type: String
-    To use the inferred type, enable PartialTypeSignatures
-    In the type signature for ‘foo’: (Show _a, _) => _a -> _
+WildcardInstantiations.hs:5:30: error:
+    • Found type wildcard ‘_’ standing for ‘String’
+      To use the inferred type, enable PartialTypeSignatures
+    • In the type ‘_a -> _’
+      In the type signature: foo :: (Show _a, _) => _a -> _
 
-WildcardInstantiations.hs:8:8:
-    Found hole ‘_’ with type: w_
-    Where: ‘w_’ is a rigid type variable bound by
-                the inferred type of bar :: w_ -> (w_ -> w_1) -> w_1
-                at WildcardInstantiations.hs:9:1
-    To use the inferred type, enable PartialTypeSignatures
-    In the type signature for ‘bar’: _ -> _ -> _
+WildcardInstantiations.hs:8:8: error:
+    • Found type wildcard ‘_’ standing for ‘t’
+      Where: ‘t’ is a rigid type variable bound by
+               the inferred type of bar :: t -> (t -> _) -> _
+               at WildcardInstantiations.hs:9:1-13
+      To use the inferred type, enable PartialTypeSignatures
+    • In the type ‘_ -> _ -> _’
+      In the type signature: bar :: _ -> _ -> _
 
-WildcardInstantiations.hs:8:13:
-    Found hole ‘_’ with type: w_ -> w_1
-    Where: ‘w_’ is a rigid type variable bound by
-                the inferred type of bar :: w_ -> (w_ -> w_1) -> w_1
-                at WildcardInstantiations.hs:9:1
-           ‘w_1’ is a rigid type variable bound by
-                 the inferred type of bar :: w_ -> (w_ -> w_1) -> w_1
-                 at WildcardInstantiations.hs:9:1
-    To use the inferred type, enable PartialTypeSignatures
-    In the type signature for ‘bar’: _ -> _ -> _
+WildcardInstantiations.hs:8:13: error:
+    • Found type wildcard ‘_’ standing for ‘t -> _’
+      Where: ‘t’, ‘_’ are rigid type variables bound by
+               the inferred type of bar :: t -> (t -> _) -> _
+               at WildcardInstantiations.hs:9:1-13
+      To use the inferred type, enable PartialTypeSignatures
+    • In the type ‘_ -> _ -> _’
+      In the type signature: bar :: _ -> _ -> _
 
-WildcardInstantiations.hs:8:18:
-    Found hole ‘_’ with type: w_1
-    Where: ‘w_1’ is a rigid type variable bound by
-                 the inferred type of bar :: w_ -> (w_ -> w_1) -> w_1
-                 at WildcardInstantiations.hs:9:1
-    To use the inferred type, enable PartialTypeSignatures
-    In the type signature for ‘bar’: _ -> _ -> _
+WildcardInstantiations.hs:8:18: error:
+    • Found type wildcard ‘_’ standing for ‘_’
+      Where: ‘_’ is a rigid type variable bound by
+               the inferred type of bar :: t -> (t -> _) -> _
+               at WildcardInstantiations.hs:9:1-13
+      To use the inferred type, enable PartialTypeSignatures
+    • In the type ‘_ -> _ -> _’
+      In the type signature: bar :: _ -> _ -> _