path: root/testsuite/tests/ghc-regress/typecheck/should_fail/tcfail031.hs

module ShouldFail where

f x = if 'a' then 1 else 2