summaryrefslogtreecommitdiff
path: root/testsuite/tests/typecheck/should_fail/tcfail182.hs
blob: 7b04df489f9c7ffc1f10f91baeb25442679186ce (plain)
1
2
3
4
5
6
7
8
9
module Foo where

import qualified Prelude
import Prelude hiding( Maybe )

data Maybe a = Foo

f :: Prelude.Maybe a -> Int
f Foo = 3