Permalink
Browse files

Reduce test size for quicker testing

Ignore-this: 57e18b365b8732ea460cee56c70d8412

darcs-hash:20090905214903-cef97-37ed2e89e92ef19126b902c20d94ee7fe24cdafb.gz
  • Loading branch information...
1 parent 5890501 commit 354e06d8243c1a97bfa0da71d330864bcec1da30 @TomMD committed Sep 5, 2009
Showing with 1 addition and 1 deletion.
  1. +1 −1 Test/MD5.hs
View
@@ -20,7 +20,7 @@ instance Arbitrary S.ByteString where
instance Arbitrary L.ByteString where
arbitrary = do
- len <- choose (0,1000) :: Gen Int
+ len <- choose (0,10) :: Gen Int
chunks <- vector len
return $ L.fromChunks chunks

0 comments on commit 354e06d

Please sign in to comment.