Follow improvements in kind error messages

testsuite/tests/ghc-regress/rename/should_fail/rnfail026.stderr

 
 rnfail026.hs:16:16:
     Kind mis-match
-    Expected kind `* -> *', but `Set a' has kind `*'
+    The first argument of `Monad' should have kind `* -> *',
+    but `Set a' has kind `*'
     In the instance declaration for `Monad (forall a. (Eq a) => Set a)'
 
 rnfail026.hs:19:0:

testsuite/tests/ghc-regress/typecheck/should_fail/tcfail113.stderr

@@ -7,7 +7,8 @@ tcfail113.hs:12:6:
 
 tcfail113.hs:15:7:
     Kind mis-match
-    Expected kind `* -> *', but `Int' has kind `*'
+    The first argument of `T' should have kind `* -> *',
+    but `Int' has kind `*'
     In the type signature for `g':
       g :: T Int
 

testsuite/tests/ghc-regress/typecheck/should_fail/tcfail132.stderr

 
 tcfail132.hs:17:36:
     Kind mis-match
-    Expected kind `k -> k1 -> k2 -> *',
+    The first argument of `T' should have kind `k -> k1 -> k2 -> *',
     but `Object f' f t' has kind `k -> k1 -> *'
     In the type `T (Object f' f t) (DUnit t)'
     In the type synonym declaration for `LiftObject'

testsuite/tests/ghc-regress/typecheck/should_fail/tcfail160.stderr

 
 tcfail160.hs:7:7:
     Kind mis-match
-    Expected kind `* -> *', but `Int' has kind `*'
+    The first argument of `T' should have kind `* -> *',
+    but `Int' has kind `*'
     In the type signature for `g':
       g :: T Int