testsuite/tests/typecheck/should_fail/tcfail168.stderr


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17


tcfail168.hs:7:11:
    Couldn't match expected type ‛IO a0’
                with actual type ‛Char -> IO ()’
    In a stmt of a 'do' block: putChar
    In the expression:
      do { putChar;
           putChar 'a';
           putChar 'a';
           putChar 'a';
           .... }
    In an equation for ‛foo’:
        foo
          = do { putChar;
                 putChar 'a';
                 putChar 'a';
                 .... }