blob: a50e75e6be09bdba35f994850c89984ec2e2fc56 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
tcfail179.hs:14:39: error:
• Couldn't match expected type ‘s’ with actual type ‘x’
‘x’ is a rigid type variable bound by
a pattern with constructor:
T :: forall s x. (s -> (x -> s) -> (x, s, Int)) -> T s,
in a case alternative
at tcfail179.hs:14:14
‘s’ is a rigid type variable bound by
the type signature for:
run :: forall s. T s -> Int
at tcfail179.hs:12:8
• In the first argument of ‘g’, namely ‘x’
In the expression: g x id
• Relevant bindings include
x :: x (bound at tcfail179.hs:14:26)
g :: s -> (x -> s) -> (x, s, Int) (bound at tcfail179.hs:14:16)
ts :: T s (bound at tcfail179.hs:13:5)
run :: T s -> Int (bound at tcfail179.hs:13:1)
|