bitvec 0.2.0.0 → 0.2.0.1

raw patch · 4 files changed

+22/−6 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• bitvec.cabal +1/−1
• changelog.md +4/−0
• src/Data/Bit/Internal.hs +2/−1
• test/Main.hs +15/−4

@@ -1,5 +1,5 @@ name: bitvec-version: 0.2.0.0+version: 0.2.0.1 cabal-version: >=1.10 build-type: Simple license: PublicDomain

@@ -1,3 +1,7 @@+# 0.2.0.1++* Fix 'Read' instance.+ # 0.2.0.0  * Remove hand-written 'Num', 'Real', 'Integral', 'Bits' instances.

@@ -31,8 +31,9 @@     showsPrec _ (Bit True ) = showString "1"  instance Read Bit where+    readsPrec p (' ':rest) = readsPrec p rest     readsPrec _ ('0':rest) = [(Bit False, rest)]-    readsPrec _ ('1':rest) = [(Bit False, rest)]+    readsPrec _ ('1':rest) = [(Bit True, rest)]     readsPrec _ _ = []  -- various internal utility functions and constants

@@ -1,15 +1,26 @@ #!/usr/bin/env runhaskell module Main where -import Test.Framework (defaultMain)--import Tests.SetOps (setOpTests)+import Data.Bit+import Data.Proxy+import Test.Framework (Test, defaultMain, testGroup)+import Test.Framework.Providers.QuickCheck2 (testProperty)+import Test.QuickCheck.Classes import Tests.MVector (mvectorTests)+import Tests.SetOps (setOpTests) import Tests.Vector (vectorTests)  main :: IO () main = defaultMain-    [ mvectorTests+    [ showReadTests+    , mvectorTests     , setOpTests     , vectorTests     ]++showReadTests :: Test+showReadTests+  = testGroup "Show/Read"+  $ map (uncurry testProperty)+  $ lawsProperties+  $ showReadLaws (Proxy :: Proxy Bit)