diff options
| author | Sam Truzjan <pxqr.sta@gmail.com> | 2013-10-31 19:17:08 +0400 |
|---|---|---|
| committer | Sam Truzjan <pxqr.sta@gmail.com> | 2013-10-31 19:17:08 +0400 |
| commit | 0853bc857b370ed5f7a453a18a7b03b28cd3b410 (patch) | |
| tree | 0437b785e9f91d53dfda170bdb48a9cd395d97da /src/Data/Torrent/Block.hs | |
| parent | e3b584173f9a58c4c662ec5e933e97c09334910e (diff) | |
Introduce PieceCount newtype
Diffstat (limited to 'src/Data/Torrent/Block.hs')
| -rw-r--r-- | src/Data/Torrent/Block.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Data/Torrent/Block.hs b/src/Data/Torrent/Block.hs index e0507aed..ca3bef45 100644 --- a/src/Data/Torrent/Block.hs +++ b/src/Data/Torrent/Block.hs | |||
| @@ -56,6 +56,7 @@ newtype BlockSize = BlockSize { unBlockSize :: Int } | |||
| 56 | -- | Widely used semi-official block size. | 56 | -- | Widely used semi-official block size. |
| 57 | instance Default BlockSize where | 57 | instance Default BlockSize where |
| 58 | def = 16 * 1024 | 58 | def = 16 * 1024 |
| 59 | {-# INLINE def #-} | ||
| 59 | 60 | ||
| 60 | type BlockLIx = Int | 61 | type BlockLIx = Int |
| 61 | type PieceLIx = Int | 62 | type PieceLIx = Int |