X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FConstants.lhs;h=0f9f49286a00a91c6c6f58b28d52a27ec9054fdc;hb=153b9cb9b11e05c4edb1b6bc0a7b972660e41f70;hp=091a7de4dc19ee475407289ec19e3a63fc787638;hpb=423d477bfecd490de1449c59325c8776f91d7aac;p=ghc-hetmet.git diff --git a/ghc/compiler/main/Constants.lhs b/ghc/compiler/main/Constants.lhs index 091a7de..0f9f492 100644 --- a/ghc/compiler/main/Constants.lhs +++ b/ghc/compiler/main/Constants.lhs @@ -12,7 +12,6 @@ module Constants (module Constants) where -- be in trouble. #include "HsVersions.h" -#include "../includes/ghcconfig.h" #include "../includes/MachRegs.h" #include "../includes/Constants.h" #include "../includes/MachDeps.h" @@ -125,6 +124,12 @@ wORD_SIZE = (SIZEOF_HSWORD :: Int) wORD_SIZE_IN_BITS = wORD_SIZE * 8 :: Int \end{code} +Size of a C int, in bytes. May be smaller than wORD_SIZE. + +\begin{code} +cINT_SIZE = (SIZEOF_INT :: Int) +\end{code} + Size of a storage manager block (in bytes). \begin{code}