mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-21 09:02:50 -06:00
Fixes for GHC 7.6 compatibility
This commit is contained in:
@@ -54,7 +54,7 @@ module Data.Binary.Builder (
|
|||||||
|
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Foreign
|
import Foreign(Word8,Ptr,Storable,ForeignPtr,withForeignPtr,poke,plusPtr,sizeOf)
|
||||||
import System.IO.Unsafe(unsafePerformIO)
|
import System.IO.Unsafe(unsafePerformIO)
|
||||||
import Data.Monoid
|
import Data.Monoid
|
||||||
--import Data.Word
|
--import Data.Word
|
||||||
|
|||||||
@@ -91,8 +91,10 @@ import Foreign
|
|||||||
-- used by splitAtST
|
-- used by splitAtST
|
||||||
#if MIN_VERSION_base(4,6,0)
|
#if MIN_VERSION_base(4,6,0)
|
||||||
import Control.Monad.ST.Unsafe(unsafeInterleaveST)
|
import Control.Monad.ST.Unsafe(unsafeInterleaveST)
|
||||||
|
#else
|
||||||
|
import Control.Monad.ST(unsafeInterleaveST)
|
||||||
#endif
|
#endif
|
||||||
import Control.Monad.ST
|
import Control.Monad.ST(runST)
|
||||||
import Data.STRef
|
import Data.STRef
|
||||||
|
|
||||||
#if defined(__GLASGOW_HASKELL__) && !defined(__HADDOCK__)
|
#if defined(__GLASGOW_HASKELL__) && !defined(__HADDOCK__)
|
||||||
|
|||||||
Reference in New Issue
Block a user