X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftests%2Ftypecheck%2Fshould_fail%2Ftcfail031.hs;h=6b9a0de12b89ec8db84514e11875502f81b3cfcc;hb=216bfb01a138932092eab3076c85648f5eee99b3;hp=c81ced82299f01e446b974cbac1b6e38d3afdedd;hpb=5eb1c77c795f92ed0f4c8023847e9d4be1a4fd0d;p=ghc-hetmet.git diff --git a/ghc/compiler/tests/typecheck/should_fail/tcfail031.hs b/ghc/compiler/tests/typecheck/should_fail/tcfail031.hs index c81ced8..6b9a0de 100644 --- a/ghc/compiler/tests/typecheck/should_fail/tcfail031.hs +++ b/ghc/compiler/tests/typecheck/should_fail/tcfail031.hs @@ -1,2 +1,3 @@ +module ShouldFail where f x = if 'a' then 1 else 2