diff options
Diffstat (limited to 'tests')
-rw-r--r-- | tests/encoding.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/encoding.hs b/tests/encoding.hs index a8490551..405d2eb1 100644 --- a/tests/encoding.hs +++ b/tests/encoding.hs | |||
@@ -1,3 +1,5 @@ | |||
1 | {-# LANGUAGE StandaloneDeriving #-} | ||
2 | {-# LANGUAGE GeneralizedNewtypeDeriving #-} | ||
1 | {-# OPTIONS -fno-warn-orphans #-} | 3 | {-# OPTIONS -fno-warn-orphans #-} |
2 | module Main (main) where | 4 | module Main (main) where |
3 | 5 | ||
@@ -29,6 +31,8 @@ instance Arbitrary BlockIx where | |||
29 | instance Arbitrary Block where | 31 | instance Arbitrary Block where |
30 | arbitrary = Block <$> positive <*> positive <*> arbitrary | 32 | arbitrary = Block <$> positive <*> positive <*> arbitrary |
31 | 33 | ||
34 | deriving instance Arbitrary Bitfield | ||
35 | |||
32 | instance Arbitrary Message where | 36 | instance Arbitrary Message where |
33 | arbitrary = oneof | 37 | arbitrary = oneof |
34 | [ pure KeepAlive | 38 | [ pure KeepAlive |