summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/Encoding.hs1
-rw-r--r--tests/Main.hs2
2 files changed, 3 insertions, 0 deletions
diff --git a/tests/Encoding.hs b/tests/Encoding.hs
index bd452975..fe0e1d7e 100644
--- a/tests/Encoding.hs
+++ b/tests/Encoding.hs
@@ -14,6 +14,7 @@ import Test.QuickCheck
14 14
15import Network.URI 15import Network.URI
16 16
17import Data.Bitfield
17import Data.Torrent 18import Data.Torrent
18import Network.BitTorrent 19import Network.BitTorrent
19 20
diff --git a/tests/Main.hs b/tests/Main.hs
index 5a9a50ee..ff3d8260 100644
--- a/tests/Main.hs
+++ b/tests/Main.hs
@@ -8,8 +8,10 @@ import Test.Framework.Providers.QuickCheck2 (testProperty)
8 8
9import Encoding 9import Encoding
10 10
11import Data.Bitfield as BT
11import Network.BitTorrent as BT 12import Network.BitTorrent as BT
12 13
14
13prop_bitfieldDiff0 :: Bitfield -> Bool 15prop_bitfieldDiff0 :: Bitfield -> Bool
14prop_bitfieldDiff0 b = (b `difference` empty (8 * bitfieldByteCount b)) == b 16prop_bitfieldDiff0 b = (b `difference` empty (8 * bitfieldByteCount b)) == b
15 17