Wolfgang Jeltsch pushed to branch wip/jeltsch/base-buildable-with-ghc-9-14 at Glasgow Haskell Compiler / GHC
Commits:
-
e8011ea1
by Wolfgang Jeltsch at 2026-05-19T16:56:46+03:00
1 changed file:
Changes:
| ... | ... | @@ -8,6 +8,7 @@ |
| 8 | 8 | --
|
| 9 | 9 | -- Derived from @primitive@ package.
|
| 10 | 10 | |
| 11 | +{-# LANGUAGE CPP #-}
|
|
| 11 | 12 | {-# LANGUAGE BangPatterns #-}
|
| 12 | 13 | {-# LANGUAGE MagicHash #-}
|
| 13 | 14 | {-# LANGUAGE TypeFamilies #-}
|
| ... | ... | @@ -32,7 +33,9 @@ import GHC.Internal.Show (intToDigit) |
| 32 | 33 | import GHC.Internal.ST (ST(..), runST)
|
| 33 | 34 | import GHC.Internal.Word (Word8(..))
|
| 34 | 35 | import GHC.Internal.TH.Syntax
|
| 35 | -import GHC.Internal.TH.Monad
|
|
| 36 | +#if __GLASGOW_HASKELL__ >= 1000
|
|
| 37 | +import GHC.Internal.TH.Monad (unsafeCodeCoerce)
|
|
| 38 | +#endif
|
|
| 36 | 39 | import GHC.Internal.TH.Lift
|
| 37 | 40 | import GHC.Internal.ForeignPtr
|
| 38 | 41 | import Prelude
|