blob: f42e8cd5c0f36b67c6ea4e147b7b79d391ebe484 (
plain)
1
2
3
4
5
6
7
8
9
10
|
{-# LANGUAGE TypeInType, MagicHash, DataKinds #-}
-- See also TypeOf.hs
import GHC.Prim
import Data.Typeable
data CharHash = CharHash Char#
main :: IO ()
main = print $ typeRep (Proxy :: Proxy 'CharHash)
|