Bump `base` version to 4.9.0.0 (closes #11026)
[ghc.git] / testsuite / tests / typecheck / should_fail / tcfail089.hs
1
2
3 -- !!! Check non-constructors in patterns fail tidily
4 -- !!! The -O made ghc 4.08 go into a loop!
5 -- Unfortunately the -O has to go in the Makefile
6
7 module ShouldFail where
8
9 compute :: String -> String
10 compute ("hd" ++ _) = "_"