Initial commit
This commit is contained in:
commit
c101616e62
309 changed files with 53937 additions and 0 deletions
31
bundled/GHC/Integer/Compat.hs
Normal file
31
bundled/GHC/Integer/Compat.hs
Normal file
|
|
@ -0,0 +1,31 @@
|
|||
{-# LANGUAGE CPP #-}
|
||||
{-# LANGUAGE Trustworthy #-}
|
||||
|
||||
module GHC.Integer.Compat (divInteger, quotRemInteger, quotInteger) where
|
||||
|
||||
import GHC.Integer (quotRemInteger, quotInteger)
|
||||
|
||||
#if MIN_VERSION_base(4,15,0)
|
||||
import GHC.Integer (divInteger)
|
||||
#else
|
||||
|
||||
#ifdef MIN_VERSION_integer_simple
|
||||
|
||||
#if MIN_VERSION_integer_simple(0,1,1)
|
||||
import GHC.Integer (divInteger)
|
||||
#else
|
||||
divInteger :: Integer -> Integer -> Integer
|
||||
divInteger = div
|
||||
#endif
|
||||
|
||||
#else
|
||||
|
||||
#if MIN_VERSION_integer_gmp(0,5,1)
|
||||
import GHC.Integer (divInteger)
|
||||
#else
|
||||
divInteger :: Integer -> Integer -> Integer
|
||||
divInteger = div
|
||||
#endif
|
||||
|
||||
#endif
|
||||
#endif
|
||||
Loading…
Add table
Add a link
Reference in a new issue