6b9a0de12b89ec8db84514e11875502f81b3cfcc
[ghc-hetmet.git] / ghc / tests / typecheck / should_fail / tcfail031.hs
1 module ShouldFail where
2
3 f x = if 'a' then 1 else 2