diff options
Diffstat (limited to 'src/Network/BitTorrent/Internal.hs')
-rw-r--r-- | src/Network/BitTorrent/Internal.hs | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/src/Network/BitTorrent/Internal.hs b/src/Network/BitTorrent/Internal.hs index 5ac58d46..f163cadb 100644 --- a/src/Network/BitTorrent/Internal.hs +++ b/src/Network/BitTorrent/Internal.hs | |||
@@ -14,15 +14,9 @@ | |||
14 | -- data should be modified through standalone functions. | 14 | -- data should be modified through standalone functions. |
15 | -- | 15 | -- |
16 | {-# LANGUAGE OverloadedStrings #-} | 16 | {-# LANGUAGE OverloadedStrings #-} |
17 | {-# LANGUAGE BangPatterns #-} | ||
18 | {-# LANGUAGE RecordWildCards #-} | 17 | {-# LANGUAGE RecordWildCards #-} |
19 | {-# LANGUAGE TemplateHaskell #-} | 18 | {-# LANGUAGE TemplateHaskell #-} |
20 | {-# LANGUAGE DeriveDataTypeable #-} | 19 | {-# LANGUAGE DeriveDataTypeable #-} |
21 | {-# LANGUAGE FlexibleInstances #-} | ||
22 | {-# LANGUAGE FlexibleContexts #-} | ||
23 | {-# LANGUAGE MultiParamTypeClasses #-} | ||
24 | {-# LANGUAGE UndecidableInstances #-} | ||
25 | {-# LANGUAGE ConstraintKinds #-} | ||
26 | module Network.BitTorrent.Internal | 20 | module Network.BitTorrent.Internal |
27 | ( Progress(..), startProgress | 21 | ( Progress(..), startProgress |
28 | 22 | ||
@@ -79,9 +73,8 @@ import Control.Concurrent | |||
79 | import Control.Concurrent.STM | 73 | import Control.Concurrent.STM |
80 | import Control.Concurrent.MSem as MSem | 74 | import Control.Concurrent.MSem as MSem |
81 | import Control.Lens | 75 | import Control.Lens |
82 | import Control.Monad.State | ||
83 | import Control.Monad.Reader | ||
84 | import Control.Exception | 76 | import Control.Exception |
77 | import Control.Monad.Trans | ||
85 | 78 | ||
86 | import Data.IORef | 79 | import Data.IORef |
87 | import Data.Default | 80 | import Data.Default |