229e007a8f1d1c10c8a050ddf7187c9e04f990ae
[ghc.git] / compiler / main / Constants.hs
1 {-
2 (c) The GRASP/AQUA Project, Glasgow University, 1992-1998
3
4 \section[Constants]{Info about this compilation}
5 -}
6
7 module Constants (module Constants) where
8
9 import Config
10
11 hiVersion :: Integer
12 hiVersion = read (cProjectVersionInt ++ cProjectPatchLevel) :: Integer
13
14 -- All pretty arbitrary:
15
16 mAX_TUPLE_SIZE :: Int
17 mAX_TUPLE_SIZE = 62 -- Should really match the number
18 -- of decls in Data.Tuple
19
20 mAX_CTUPLE_SIZE :: Int -- Constraint tuples
21 mAX_CTUPLE_SIZE = 16 -- Should match the number of decls in GHC.Classes
22
23 -- | Default maximum depth for both class instance search and type family
24 -- reduction. See also Trac #5395.
25 mAX_REDUCTION_DEPTH :: Int
26 mAX_REDUCTION_DEPTH = 200
27
28 wORD64_SIZE :: Int
29 wORD64_SIZE = 8
30
31 tARGET_MAX_CHAR :: Int
32 tARGET_MAX_CHAR = 0x10ffff