From 8bbe088d0a04e46a5f0f0128483c73cbb2405dbe Mon Sep 17 00:00:00 2001 From: Julien Tanguy Date: Wed, 17 Jun 2015 17:51:29 +0200 Subject: Update QuickCheck [ci skip] --- test/Crypto/Macaroon/Instances.hs | 13 ------------- 1 file changed, 13 deletions(-) (limited to 'test') diff --git a/test/Crypto/Macaroon/Instances.hs b/test/Crypto/Macaroon/Instances.hs index c82bbd3..6955637 100644 --- a/test/Crypto/Macaroon/Instances.hs +++ b/test/Crypto/Macaroon/Instances.hs @@ -23,19 +23,6 @@ import Test.Tasty.QuickCheck import Crypto.Macaroon - --- | Adjust the size parameter, by transforming it with the given --- function. --- Copied over from QuickCheck 2.8 -scale :: (Int -> Int) -> Gen a -> Gen a -scale f g = sized (\n -> resize (f n) g) - - --- | Generates a random subsequence of the given list. --- Copied over from QuickCheck 2.8 -sublistOf :: [a] -> Gen [a] -sublistOf = filterM (\_ -> choose (False, True)) - newtype Url = Url { unUrl :: BS.ByteString } deriving (Show) instance Arbitrary Url where -- cgit v1.2.3