path: root/testsuite/tests/parser/should_compile/read044.hs

-- test case from #1091
main =
          case True of {- | -}
            True  -> putStrLn "Hello World\n"
            False {- | -} -> putStrLn "Goodbye Cruel World\n"