1 -- !!! Testing Typeable instances
2 module Main(main) where
28 print (typeOf (undefined :: [()]))
29 print (typeOf (undefined :: ()))
30 print (typeOf (undefined :: ((),())))
31 print (typeOf (undefined :: ((),(),())))
32 print (typeOf (undefined :: ((),(),(),())))
33 print (typeOf (undefined :: ((),(),(),(),())))
34 print (typeOf (undefined :: (() -> ())))
35 print (typeOf (undefined :: (Array () ())))
36 print (typeOf (undefined :: Bool))
37 print (typeOf (undefined :: Char))
38 print (typeOf (undefined :: (Complex ())))
39 print (typeOf (undefined :: Double))
40 print (typeOf (undefined :: (Either () ())))
41 print (typeOf (undefined :: Float))
42 print (typeOf (undefined :: Handle))
43 print (typeOf (undefined :: Int))
44 print (typeOf (undefined :: Integer))
45 print (typeOf (undefined :: IO ()))
46 print (typeOf (undefined :: (Maybe ())))
47 print (typeOf (undefined :: Ordering))
49 print (typeOf (undefined :: Addr))
50 print (typeOf (undefined :: Dynamic))
51 print (typeOf (undefined :: ForeignObj))
52 print (typeOf (undefined :: (IORef ())))
53 print (typeOf (undefined :: Int8))
54 print (typeOf (undefined :: Int16))
55 print (typeOf (undefined :: Int32))
56 print (typeOf (undefined :: Int64))
57 print (typeOf (undefined :: (ST () ())))
58 print (typeOf (undefined :: (StableName ())))
59 print (typeOf (undefined :: (StablePtr ())))
60 print (typeOf (undefined :: TyCon))
61 print (typeOf (undefined :: TypeRep))
62 print (typeOf (undefined :: Word8))
63 print (typeOf (undefined :: Word16))
64 print (typeOf (undefined :: Word32))
65 print (typeOf (undefined :: Word64))
67 print (typeOf (undefined :: ArithException))
68 print (typeOf (undefined :: AsyncException))
69 print (typeOf (undefined :: (ByteArray ())))
70 print (typeOf (undefined :: Exception))
71 print (typeOf (undefined :: (IOArray () ())))
72 print (typeOf (undefined :: (IOUArray () ())))
73 print (typeOf (undefined :: (MutableByteArray () ())))
74 print (typeOf (undefined :: PackedString))
75 print (typeOf (undefined :: (STArray () () ())))
76 print (typeOf (undefined :: (STUArray () () ())))
77 print (typeOf (undefined :: (StableName ())))
78 print (typeOf (undefined :: (StablePtr ())))
79 print (typeOf (undefined :: (UArray () ())))
80 print (typeOf (undefined :: (Weak ())))
82 print (typeOf (undefined :: CChar))
83 print (typeOf (undefined :: CSChar))
84 print (typeOf (undefined :: CUChar))
85 print (typeOf (undefined :: CShort))
86 print (typeOf (undefined :: CUShort))
87 print (typeOf (undefined :: CInt))
88 print (typeOf (undefined :: CUInt))
89 print (typeOf (undefined :: CLong))
90 print (typeOf (undefined :: CULong))
91 print (typeOf (undefined :: CLLong))
92 print (typeOf (undefined :: CULLong))
93 print (typeOf (undefined :: CFloat))
94 print (typeOf (undefined :: CDouble))
95 print (typeOf (undefined :: CLDouble))
97 print (typeOf (undefined :: CPtrdiff))
98 print (typeOf (undefined :: CSize))
99 print (typeOf (undefined :: CWchar))
100 print (typeOf (undefined :: CSigAtomic))
101 print (typeOf (undefined :: CClock))
102 print (typeOf (undefined :: CTime))