File: Constants.hsc

package info (click to toggle)
haskell-ghc-lib-parser 9.0.2.20211226-2
  • links: PTS
  • area: main
  • in suites: bookworm
  • size: 8,668 kB
  • sloc: haskell: 94,206; ansic: 1,258; makefile: 12
file content (17 lines) | stat: -rw-r--r-- 389 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
{-# LANGUAGE CPP #-}

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

#include "MachDeps.h"

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

wORD_SIZE, tAG_MASK, wORD_SIZE_IN_BITS :: Int
wORD_SIZE = #const SIZEOF_HSWORD
wORD_SIZE_IN_BITS = #const WORD_SIZE_IN_BITS
tAG_MASK = (1 `shift` #const TAG_BITS) - 1