shithub: MicroHs

ref: d16c2beb0f5cd945eaf9498c7566eff9c8c377f4
dir: /lib/Data/Proxy.hs/

View raw version 
module Data.Proxy(module Data.Proxy) where
import Prelude

-- NOTE: not polykinded yet
data Proxy a = Proxy

instance forall a . Show (Proxy a) where
  show _ = "Proxy"

instance forall a . Eq (Proxy a) where
  _ == _  =  True