blob: 5c325d074fc3d1166d0ba64d4e1abcd855ab705a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE MagicHash #-}
{-# LANGUAGE UnboxedTuples #-}
module GHC.Num.BigNat where
import GHC.Num.WordArray
import GHC.Prim
type BigNat = WordArray#
bigNatSubUnsafe :: BigNat -> BigNat -> BigNat
bigNatMulWord# :: BigNat -> Word# -> BigNat
bigNatRem :: BigNat -> BigNat -> BigNat
bigNatRemWord# :: BigNat -> Word# -> Word#
bigNatShiftR# :: BigNat -> Word# -> BigNat
bigNatShiftL# :: BigNat -> Word# -> BigNat
bigNatCtz# :: BigNat -> Word#
bigNatCtzWord# :: BigNat -> Word#
|
