Testsuite error message changes
[ghc.git] / testsuite / tests / simplCore / should_compile / T9400.stderr
1
2 ==================== Tidy Core ====================
3 Result size of Tidy Core = {terms: 23, types: 16, coercions: 0}
4
5 main :: IO ()
6 [GblId, Str=DmdType]
7 main =
8   >>
9     @ IO
10     GHC.Base.$fMonadIO
11     @ ()
12     @ ()
13     (putStrLn (unpackCString# "c"#))
14     (>>
15        @ IO
16        GHC.Base.$fMonadIO
17        @ ()
18        @ ()
19        (putStrLn (unpackCString# "x"#))
20        (>>
21           @ IO
22           GHC.Base.$fMonadIO
23           @ ()
24           @ ()
25           (putStrLn (unpackCString# "z"#))
26           (>>
27              @ IO
28              GHC.Base.$fMonadIO
29              @ ()
30              @ ()
31              (putStrLn (unpackCString# "efg"#))
32              (Control.Exception.Base.patError
33                 @ (IO ()) "T9400.hs:(17,5)-(18,29)|case"#))))
34
35
36