Make Data.ByteString.Short work on several ghc versions

Older GHC do not keep the length of the ByteArray# in a useful way so we have to store it separately. Adjust the implementations to use primop wrappers with ST or IO rather than direct primops and State#. Check core for the important functions and made a few adjustments.
haskell · Oct 2, 2013 · eaa31e0 · eaa31e0
1 parent 4720784
commit eaa31e0
Show file tree

Hide file tree

Showing 3 changed files with 318 additions and 151 deletions.
diff --git a/Data/ByteString/Short.hs b/Data/ByteString/Short.hs
@@ -1,7 +1,7 @@
-{-# LANGUAGE DeriveDataTypeable, CPP, BangPatterns, RankNTypes,
-             ForeignFunctionInterface, MagicHash, UnboxedTuples #-}
+{-# LANGUAGE CPP #-}
+#if __GLASGOW_HASKELL__ >= 701
 {-# LANGUAGE Trustworthy #-}
-{-# OPTIONS_GHC -fno-warn-name-shadowing #-}
+#endif
 
 -- |
 -- Module      : Data.ByteString.Short