GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 11:42:49 -06:00
Code Issues Packages Projects Releases Wiki Activity

support ghc9.4

Browse Source
This commit is contained in:
o1lo01ol1o
2023-11-15 12:04:41 -06:00
parent 7d9015e2e1
commit 2c98075a0b
3 changed files with 23 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
src/runtime/haskell/Data/Binary/Builder.hs
View File

@@ -74,13 +74,16 @@ import qualified Data.ByteString.Internal as S
#endif #endif
#if defined(__GLASGOW_HASKELL__) && !defined(__HADDOCK__) #if defined(__GLASGOW_HASKELL__) && !defined(__HADDOCK__)
import GHC.Base(Int(..),uncheckedShiftRL# ) import GHC.Base(Int(..),uncheckedShiftRL#,)
import GHC.Word (Word32(..),Word16(..),Word64(..)) import GHC.Word (Word32(..),Word16(..),Word64(..))
#if MIN_VERSION_base(4,16,0) #if MIN_VERSION_base(4,16,0)
import GHC.Exts (wordToWord16#, word16ToWord#, wordToWord32#, word32ToWord#) import GHC.Exts (wordToWord16#, word16ToWord#, wordToWord32#, word32ToWord#)
#endif #endif
#if WORD_SIZE_IN_BITS < 64 && __GLASGOW_HASKELL__ >= 608 #if WORD_SIZE_IN_BITS < 64 && __GLASGOW_HASKELL__ >= 608
import GHC.Word (uncheckedShiftRL64#)
#endif
#if __GLASGOW_HASKELL__ >= 900
import GHC.Word (uncheckedShiftRL64#) import GHC.Word (uncheckedShiftRL64#)
#endif #endif
#endif #endif
@@ -433,7 +436,11 @@ foreign import ccall unsafe "stg_uncheckedShiftRL64"
#endif #endif
#else #else
#if __GLASGOW_HASKELL__ <= 810
shiftr_w64 (W64# w) (I# i) = W64# (w `uncheckedShiftRL#` i) shiftr_w64 (W64# w) (I# i) = W64# (w `uncheckedShiftRL#` i)
#else
shiftr_w64 (W64# w) (I# i) = W64# (w `uncheckedShiftRL64#` i)
#endif
#endif #endif
#else #else

8
src/runtime/haskell/Data/Binary/Get.hs
View File

@@ -104,6 +104,9 @@ import GHC.Word
#if MIN_VERSION_base(4,16,0) #if MIN_VERSION_base(4,16,0)
import GHC.Exts (wordToWord16#, word16ToWord#, wordToWord32#, word32ToWord#) import GHC.Exts (wordToWord16#, word16ToWord#, wordToWord32#, word32ToWord#)
#endif #endif
#if __GLASGOW_HASKELL__ >= 900
import GHC.Word (uncheckedShiftL64#)
#endif
#endif #endif
-- Control.Monad.Fail import will become redundant in GHC 8.8+ -- Control.Monad.Fail import will become redundant in GHC 8.8+
@@ -553,7 +556,12 @@ foreign import ccall unsafe "stg_uncheckedShiftL64"
#endif #endif
#else #else
#if __GLASGOW_HASKELL__ <= 810
shiftl_w64 (W64# w) (I# i) = W64# (w `uncheckedShiftL#` i) shiftl_w64 (W64# w) (I# i) = W64# (w `uncheckedShiftL#` i)
#else
shiftl_w64 (W64# w) (I# i) = W64# (w `uncheckedShiftL64#` i)
#endif
#endif #endif
#else #else

12
src/runtime/haskell/pgf.cabal
View File

@@ -9,16 +9,16 @@ synopsis: Grammatical Framework
description: A library for interpreting the Portable Grammar Format (PGF) description: A library for interpreting the Portable Grammar Format (PGF)
homepage: https://www.grammaticalframework.org/ homepage: https://www.grammaticalframework.org/
bug-reports: https://github.com/GrammaticalFramework/gf-core/issues bug-reports: https://github.com/GrammaticalFramework/gf-core/issues
tested-with: GHC==7.10.3, GHC==8.0.2, GHC==8.10.4 tested-with: GHC==7.10.3, GHC==8.0.2, GHC==8.10.4, GHC==9.4.5
library library
default-language: Haskell2010 default-language: Haskell2010
build-depends: build-depends:
array >= 0.5.1 && < 0.6, array >= 0.5.1 && < 0.7,
base >= 4.9.1 && < 4.16, base >= 4.9.1 && < 5.0,
bytestring >= 0.10.8 && < 0.11, bytestring >= 0.10.8 && < 0.12,
containers >= 0.5.7 && < 0.7, containers >= 0.5.7 && < 0.8,
ghc-prim >= 0.5.0 && < 0.7, ghc-prim >= 0.5.0 && < 0.10,
mtl >= 2.2.1 && < 2.3, mtl >= 2.2.1 && < 2.3,
pretty >= 1.1.3 && < 1.2, pretty >= 1.1.3 && < 1.2,
random >= 1.1 && < 1.3, random >= 1.1 && < 1.3,