diff options
Diffstat (limited to 'testsuite/tests/simplCore/should_compile/T9400.stderr')
| -rw-r--r-- | testsuite/tests/simplCore/should_compile/T9400.stderr | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T9400.stderr b/testsuite/tests/simplCore/should_compile/T9400.stderr index 521b862d57..ad14ae8e09 100644 --- a/testsuite/tests/simplCore/should_compile/T9400.stderr +++ b/testsuite/tests/simplCore/should_compile/T9400.stderr @@ -41,31 +41,31 @@ main :: IO () [GblId] main = >> - @ IO + @IO GHC.Base.$fMonadIO - @ () - @ () + @() + @() (putStrLn (unpackCString# "c"#)) (>> - @ IO + @IO GHC.Base.$fMonadIO - @ () - @ () + @() + @() (putStrLn (unpackCString# "x"#)) (>> - @ IO + @IO GHC.Base.$fMonadIO - @ () - @ () + @() + @() (putStrLn (unpackCString# "z"#)) (>> - @ IO + @IO GHC.Base.$fMonadIO - @ () - @ () + @() + @() (putStrLn (unpackCString# "efg"#)) (Control.Exception.Base.patError - @ 'LiftedRep @ (IO ()) "T9400.hs:(17,5)-(18,29)|case"#)))) + @'LiftedRep @(IO ()) "T9400.hs:(17,5)-(18,29)|case"#)))) |