path: root/testsuite/tests/ghc-regress/module/mod112.hs

-- !!! Hiding an abstract (Prelude) class
module M where

import Prelude hiding ( Eq )

class Eq a where
  equ :: a -> Bool

f :: Eq a => a -> Bool
f x = equ x