{-# LINE 1 "libraries/ghc-heap/GHC/Exts/Heap/Constants.hsc" #-}
{-# LANGUAGE CPP #-}

module GHC.Exts.Heap.Constants
    ( wORD_SIZE
    , tAG_MASK
    , wORD_SIZE_IN_BITS
    ) where



import Prelude -- See note [Why do we import Prelude here?]
import Data.Bits

wORD_SIZE, tAG_MASK, wORD_SIZE_IN_BITS :: Int
wORD_SIZE :: Int
wORD_SIZE = Int
8
{-# LINE 16 "libraries/ghc-heap/GHC/Exts/Heap/Constants.hsc" #-}
wORD_SIZE_IN_BITS = 64
tAG_MASK :: Int
{-# LINE 17 "libraries/ghc-heap/GHC/Exts/Heap/Constants.hsc" #-}
tAG_MASK = (1 `shift` 3) - 1
{-# LINE 18 "libraries/ghc-heap/GHC/Exts/Heap/Constants.hsc" #-}