[commit: packages/bytestring] master, revert-46-patch-1, wip/nix-local-build: Fix type error in previous commit. (e48344e)

git at git.haskell.org git at git.haskell.org
Tue May 3 22:42:51 UTC 2016


Repository : ssh://git@git.haskell.org/bytestring

On branches: master,revert-46-patch-1,wip/nix-local-build
Link       : http://git.haskell.org/packages/bytestring.git/commitdiff/e48344e9a7f8421800ee0dbcb4883acbb7506335

>---------------------------------------------------------------

commit e48344e9a7f8421800ee0dbcb4883acbb7506335
Author: Sean <burton.seanr at gmail.com>
Date:   Thu Sep 24 18:51:49 2015 +0100

    Fix type error in previous commit.


>---------------------------------------------------------------

e48344e9a7f8421800ee0dbcb4883acbb7506335
 tests/QuickCheckUtils.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tests/QuickCheckUtils.hs b/tests/QuickCheckUtils.hs
index cdcd700..b61dcd1 100644
--- a/tests/QuickCheckUtils.hs
+++ b/tests/QuickCheckUtils.hs
@@ -51,7 +51,8 @@ instance Arbitrary L.ByteString where
                                    else fmap (L.checkInvariant .
                                               L.fromChunks .
                                               filter (not . P.null)) $
-                                            vectorOf (sizedByteString
+                                            vectorOf numChunks
+                                                     (sizedByteString
                                                           (n `div` numChunks))
 
 instance CoArbitrary L.ByteString where



More information about the ghc-commits mailing list