summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_fail/tcfail037.hs
blob: d2110c755a751ebbe53cc3edf21fda174e257bad (plain)
1
2
3
4
5
6
7
8
9
10
11
-- !!! PreludeCore entities cannot be redefined at the top-level
--
module ShouldFail where

data NUM = ONE | TWO

f a b = a + b
f :: NUM -> NUM -> NUM

ONE + ONE = TWO