diff options
Diffstat (limited to 'src/Data')
-rw-r--r-- | src/Data/Bitfield.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Data/Bitfield.hs b/src/Data/Bitfield.hs index 56365bf7..7cd07123 100644 --- a/src/Data/Bitfield.hs +++ b/src/Data/Bitfield.hs | |||
@@ -13,7 +13,7 @@ | |||
13 | {-# LANGUAGE BangPatterns #-} | 13 | {-# LANGUAGE BangPatterns #-} |
14 | {-# LANGUAGE RecordWildCards #-} | 14 | {-# LANGUAGE RecordWildCards #-} |
15 | module Data.Bitfield | 15 | module Data.Bitfield |
16 | ( Bitfield, PieceCount | 16 | ( PieceIx, PieceCount, Bitfield |
17 | 17 | ||
18 | -- * Construction | 18 | -- * Construction |
19 | , haveAll, haveNone, have | 19 | , haveAll, haveNone, have |
@@ -54,9 +54,10 @@ import qualified Data.IntervalSet.ByteString as S | |||
54 | import Data.List (foldl') | 54 | import Data.List (foldl') |
55 | import Data.Monoid | 55 | import Data.Monoid |
56 | import Data.Ratio | 56 | import Data.Ratio |
57 | import Network.BitTorrent.PeerWire.Block | ||
58 | 57 | ||
59 | 58 | ||
59 | type PieceIx = Int | ||
60 | |||
60 | -- | Used to represent max set bound. Min set bound is always set to | 61 | -- | Used to represent max set bound. Min set bound is always set to |
61 | -- zero. | 62 | -- zero. |
62 | type PieceCount = Int | 63 | type PieceCount = Int |