Fix incorrect ambiguity error on identically-named data constructors
[ghc.git] / testsuite / tests / typecheck / should_fail / T7437.stderr
index d305cee..d6663df 100644 (file)
@@ -11,7 +11,9 @@ T7437.hs:14:13: error:
     • Could not deduce (Put a0)
       from the context: (Put a, Generic t, GPut (Rep t))
         bound by the type signature for:
-                   put :: (Put a, Generic t, GPut (Rep t)) => t -> [()]
+                   put :: forall a.
+                          Put a =>
+                          forall t. (Generic t, GPut (Rep t)) => t -> [()]
         at T7437.hs:14:13-15
       The type variable ‘a0’ is ambiguous
     • In the ambiguity check for ‘put’