msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Fixes for GHC 7.6 compatibility

Browse Source
This commit is contained in:
hallgren
2014-03-04 14:28:44 +00:00
parent 76ba865c2e
commit 108e04b7bd
2 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/binary/Data/Binary/Builder.hs
View File

@@ -54,7 +54,7 @@ module Data.Binary.Builder (
) where
import Foreign
import Foreign(Word8,Ptr,Storable,ForeignPtr,withForeignPtr,poke,plusPtr,sizeOf)
import System.IO.Unsafe(unsafePerformIO)
import Data.Monoid
--import Data.Word

4
src/binary/Data/Binary/Get.hs
View File

@@ -91,8 +91,10 @@ import Foreign
-- used by splitAtST
#if MIN_VERSION_base(4,6,0)
import Control.Monad.ST.Unsafe(unsafeInterleaveST)
#else
import Control.Monad.ST(unsafeInterleaveST)
#endif
import Control.Monad.ST
import Control.Monad.ST(runST)
import Data.STRef
#if defined(__GLASGOW_HASKELL__) && !defined(__HADDOCK__)