Testsuite error message changes
[ghc.git] / testsuite / tests / rebindable / rebindable6.stderr
1
2 rebindable6.hs:106:17:
3     No instance for (HasSeq (IO a -> t0 -> IO b))
4       arising from a do statement
5     The type variable ‘t0’ is ambiguous
6     Relevant bindings include
7       g :: IO (Maybe b) (bound at rebindable6.hs:104:19)
8       f :: IO a (bound at rebindable6.hs:104:17)
9       test_do :: IO a -> IO (Maybe b) -> IO b
10         (bound at rebindable6.hs:104:9)
11     Note: there is a potential instance available:
12       instance HasSeq (IO a -> IO b -> IO b)
13         -- Defined at rebindable6.hs:52:18
14     In a stmt of a 'do' block: f
15     In the expression:
16       do { f;
17            Just (b :: b) <- g;
18            return b }
19     In an equation for ‘test_do’:
20         test_do f g
21           = do { f;
22                  Just (b :: b) <- g;
23                  return b }
24
25 rebindable6.hs:107:17:
26     No instance for (HasFail ([Prelude.Char] -> t1))
27       arising from a do statement
28     The type variable ‘t1’ is ambiguous
29     Note: there is a potential instance available:
30       instance HasFail (String -> IO a)
31         -- Defined at rebindable6.hs:57:18
32     In a stmt of a 'do' block: Just (b :: b) <- g
33     In the expression:
34       do { f;
35            Just (b :: b) <- g;
36            return b }
37     In an equation for ‘test_do’:
38         test_do f g
39           = do { f;
40                  Just (b :: b) <- g;
41                  return b }
42
43 rebindable6.hs:108:17:
44     No instance for (HasReturn (b -> t1))
45       arising from a use of ‘return’
46     The type variable ‘t1’ is ambiguous
47     Relevant bindings include
48       b :: b (bound at rebindable6.hs:107:23)
49       g :: IO (Maybe b) (bound at rebindable6.hs:104:19)
50       test_do :: IO a -> IO (Maybe b) -> IO b
51         (bound at rebindable6.hs:104:9)
52     Note: there is a potential instance available:
53       instance HasReturn (a -> IO a) -- Defined at rebindable6.hs:42:18
54     In a stmt of a 'do' block: return b
55     In the expression:
56       do { f;
57            Just (b :: b) <- g;
58            return b }
59     In an equation for ‘test_do’:
60         test_do f g
61           = do { f;
62                  Just (b :: b) <- g;
63                  return b }