diff options
Diffstat (limited to 'tests/Main.hs')
| -rw-r--r-- | tests/Main.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/Main.hs b/tests/Main.hs index b99f2469..45f92813 100644 --- a/tests/Main.hs +++ b/tests/Main.hs | |||
| @@ -161,6 +161,9 @@ positive = fromIntegral <$> (arbitrary :: Gen Word32) | |||
| 161 | instance Arbitrary ByteString where | 161 | instance Arbitrary ByteString where |
| 162 | arbitrary = B.pack <$> arbitrary | 162 | arbitrary = B.pack <$> arbitrary |
| 163 | 163 | ||
| 164 | instance Arbitrary Lazy.ByteString where | ||
| 165 | arbitrary = Lazy.pack <$> arbitrary | ||
| 166 | |||
| 164 | instance Arbitrary BlockIx where | 167 | instance Arbitrary BlockIx where |
| 165 | arbitrary = BlockIx <$> positive <*> positive <*> positive | 168 | arbitrary = BlockIx <$> positive <*> positive <*> positive |
| 166 | 169 | ||