0a1b83ad9e4de429a37726ad0e6a676c7318142a
[ghc.git] / testsuite / tests / polykinds / T12593.stderr
1
2 T12593.hs:11:16: error:
3     • Expecting two fewer arguments to ‘Free k k4 k5 p’
4       Expected kind ‘k0 -> k1 -> *’, but ‘Free k k4 k5 p’ has kind ‘*’
5     • In the type signature:
6         run :: k2 q =>
7                Free k k1 k2 p a b
8                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b
9
10 T12593.hs:12:31: error:
11     • Expecting one more argument to ‘k’
12       Expected a type, but
13       ‘k’ has kind
14       ‘(((k0 -> k1 -> *) -> Constraint) -> (k2 -> k3 -> *) -> *)
15        -> Constraint’
16     • In the kind ‘k’
17       In the type signature:
18         run :: k2 q =>
19                Free k k1 k2 p a b
20                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b
21
22 T12593.hs:12:40: error:
23     • Expecting two more arguments to ‘k4’
24       Expected a type, but
25       ‘k4’ has kind
26       ‘((k0 -> k1 -> *) -> Constraint) -> (k2 -> k3 -> *) -> *’
27     • In the kind ‘k1’
28       In the type signature:
29         run :: k2 q =>
30                Free k k1 k2 p a b
31                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b
32
33 T12593.hs:12:47: error:
34     • Couldn't match kind ‘(((k0 -> k1 -> *) -> Constraint)
35                             -> (k2 -> k3 -> *) -> *)
36                            -> Constraint’
37                      with ‘*’
38       When matching kinds
39         k :: (((k0 -> k1 -> *) -> Constraint) -> (k2 -> k3 -> *) -> *)
40              -> Constraint
41         k2 :: *
42     • In the first argument of ‘p’, namely ‘c’
43       In the type signature:
44         run :: k2 q =>
45                Free k k1 k2 p a b
46                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b
47
48 T12593.hs:12:49: error:
49     • Couldn't match kind ‘((k0 -> k1 -> *) -> Constraint)
50                            -> (k2 -> k3 -> *) -> *’
51                      with ‘*’
52       When matching kinds
53         k4 :: ((k0 -> k1 -> *) -> Constraint) -> (k2 -> k3 -> *) -> *
54         k3 :: *
55     • In the second argument of ‘p’, namely ‘d’
56       In the type signature:
57         run :: k2 q =>
58                Free k k1 k2 p a b
59                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b
60
61 T12593.hs:12:56: error:
62     • Couldn't match kind ‘(((k0 -> k1 -> *) -> Constraint)
63                             -> (k2 -> k3 -> *) -> *)
64                            -> Constraint’
65                      with ‘*’
66       When matching kinds
67         k :: (((k0 -> k1 -> *) -> Constraint) -> (k2 -> k3 -> *) -> *)
68              -> Constraint
69         k0 :: *
70     • In the first argument of ‘q’, namely ‘c’
71       In the type signature:
72         run :: k2 q =>
73                Free k k1 k2 p a b
74                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b
75
76 T12593.hs:12:58: error:
77     • Couldn't match kind ‘((k0 -> k1 -> *) -> Constraint)
78                            -> (k2 -> k3 -> *) -> *’
79                      with ‘*’
80       When matching kinds
81         k4 :: ((k0 -> k1 -> *) -> Constraint) -> (k2 -> k3 -> *) -> *
82         k1 :: *
83     • In the second argument of ‘q’, namely ‘d’
84       In the type signature:
85         run :: k2 q =>
86                Free k k1 k2 p a b
87                -> (forall (c :: k) (d :: k1). p c d -> q c d) -> q a b