bits 0.1 → 0.2

raw patch · 3 files changed

+6/−10 lines, 3 filesdep ~bytes

Dependency ranges changed: bytes

Files

CHANGELOG.markdown +4/−0
bits.cabal +2/−2
src/Data/Bits/Coding.hs +0/−8

CHANGELOG.markdown view

@@ -1,3 +1,7 @@+0.2+---+* Crippled to work with `bytes` 0.7, so we can work with `binary >= 0.6`.+ 0.1 --- * Repository initialized

bits.cabal view

@@ -1,6 +1,6 @@ name:          bits category:      Data, Serialization-version:       0.1+version:       0.2 license:       BSD3 cabal-version: >= 1.8 license-file:  LICENSE@@ -42,7 +42,7 @@ library   build-depends:     base         >= 4.3      && < 5,-    bytes        >= 0.1      && < 1,+    bytes        >= 0.7      && < 1,     mtl          >= 2.0      && < 2.2,     transformers >= 0.2      && < 0.4

src/Data/Bits/Coding.hs view

@@ -130,14 +130,6 @@   {-# INLINE uncheckedSkip #-}   lookAhead (Coding m) = Coding $ \k i b -> lookAhead (m k i b)   {-# INLINE lookAhead #-}-  lookAheadM (Coding m) = Coding $ \k i b -> do-    emm <- lookAheadE $ m (\ma i' b' -> return $ maybe (Left (k Nothing i b)) (\a -> Right (k (Just a) i' b')) ma) i b-    either id id emm-  {-# INLINE lookAheadM #-}-  lookAheadE (Coding m) = Coding $ \k i b -> do-    emm <- lookAheadE $ m (\ea i' b' -> return $ either (\a -> Left (k (Left a) i b)) (\a -> Right (k (Right a) i' b')) ea) i b-    either id id emm-  {-# INLINE lookAheadE #-}   uncheckedLookAhead = getAligned . uncheckedLookAhead   {-# INLINE uncheckedLookAhead #-}   getBytes  = getAligned . getBytes