rainbox 0.14.0.0 → 0.16.0.0

raw patch · 4 files changed

+16/−10 lines, 4 filesdep ~rainbowPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: rainbow

API changes (from Hackage documentation)

Files

lib/Rainbox/Core.hs +1/−1
rainbox.cabal +5/−5
test/Rainbow/Instances.hs +9/−3
test/rainbox-properties.hs +1/−1

lib/Rainbox/Core.hs view

@@ -94,7 +94,7 @@   width (Width a) = max 0 a  instance HasWidth (Chunk Text) where-  width (Chunk _ _ t) = X.length t+  width (Chunk _ t) = X.length t  instance (HasWidth a, HasWidth b) => HasWidth (Either a b) where   width = either width width

rainbox.cabal view

@@ -3,11 +3,11 @@ -- http://www.github.com/massysett/cartel -- -- Script name used to generate: genCabal.hs--- Generated on: 2015-04-25 16:47:00.642334 EDT+-- Generated on: 2015-04-26 13:36:49.036797 EDT -- Cartel library version: 0.14.2.6  name: rainbox-version: 0.14.0.0+version: 0.16.0.0 cabal-version: >= 1.18 license: BSD3 license-file: LICENSE@@ -43,7 +43,7 @@     lib   build-depends:       base >= 4.5.0.0 && < 4.9.0.0-    , rainbow >= 0.24 && < 0.25+    , rainbow >= 0.26 && < 0.27     , bytestring >= 0.10 && < 0.11     , containers >= 0.5.5 && < 0.6     , text >= 0.11.3.1 && < 1.3.0.0@@ -56,7 +56,7 @@   main-is: rainbox-properties.hs   build-depends:       base >= 4.5.0.0 && < 4.9.0.0-    , rainbow >= 0.24 && < 0.25+    , rainbow >= 0.26 && < 0.27     , bytestring >= 0.10 && < 0.11     , containers >= 0.5.5 && < 0.6     , text >= 0.11.3.1 && < 1.3.0.0@@ -81,7 +81,7 @@   main-is: rainbox-visual.hs   build-depends:       base >= 4.5.0.0 && < 4.9.0.0-    , rainbow >= 0.24 && < 0.25+    , rainbow >= 0.26 && < 0.27     , bytestring >= 0.10 && < 0.11     , containers >= 0.5.5 && < 0.6     , text >= 0.11.3.1 && < 1.3.0.0

test/Rainbow/Instances.hs view

@@ -72,15 +72,21 @@     . coarbitrary c  +instance Arbitrary Scheme where+  arbitrary = Scheme <$> arbitrary <*> arbitrary+  shrink = genericShrink++instance CoArbitrary Scheme where+  coarbitrary (Scheme a b) = coarbitrary a . coarbitrary b+ instance Arbitrary a => Arbitrary (Chunk a) where-  arbitrary = Chunk <$> arbitrary <*> arbitrary <*> arbitrary+  arbitrary = Chunk <$> arbitrary <*> arbitrary   shrink = genericShrink  instance CoArbitrary a => CoArbitrary (Chunk a) where-  coarbitrary (Chunk a b c)+  coarbitrary (Chunk a b)     = coarbitrary a     . coarbitrary b-    . coarbitrary c  instance Arbitrary Radiant where   arbitrary = Radiant <$> arbitrary <*> arbitrary

test/rainbox-properties.hs view

@@ -75,7 +75,7 @@   , testGroup "chunk" $     [ testProperty "height is always 1" $ \c ->       let _types = c :: Chunk X.Text in height c == 1-    , testProperty "width is sum of number of characters" $ \c@(Chunk _ _ t) ->+    , testProperty "width is sum of number of characters" $ \c@(Chunk _ t) ->       let _types = c :: Chunk X.Text in width c == X.length t     ]