summaryrefslogtreecommitdiff
path: root/Announcer.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Announcer.hs')
-rw-r--r--Announcer.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/Announcer.hs b/Announcer.hs
index 1b6cd631..e4b19bd7 100644
--- a/Announcer.hs
+++ b/Announcer.hs
@@ -27,10 +27,7 @@ module Announcer
27 , ScheduledItem(ScheduledItem) 27 , ScheduledItem(ScheduledItem)
28 ) where 28 ) where
29 29
30import qualified Data.MinMaxPSQ as MM
31import Data.Wrapper.PSQ as PSQ 30import Data.Wrapper.PSQ as PSQ
32import Network.Kademlia.Routing as R
33import Network.Kademlia.Search
34 31
35import Control.Concurrent.Lifted.Instrument 32import Control.Concurrent.Lifted.Instrument
36import Control.Concurrent.STM 33import Control.Concurrent.STM
@@ -38,14 +35,10 @@ import Control.Monad
38import Control.Applicative 35import Control.Applicative
39import Data.ByteString (ByteString) 36import Data.ByteString (ByteString)
40import qualified Data.ByteString.Char8 as Char8 37import qualified Data.ByteString.Char8 as Char8
41import Data.Function
42import Data.Hashable 38import Data.Hashable
43import Data.Maybe
44import Data.Ord
45import Data.Time.Clock.POSIX 39import Data.Time.Clock.POSIX
46import qualified GHC.Generics as Generics 40import qualified GHC.Generics as Generics
47-- import Generic.Data.Internal.Meta as Lyxia 41-- import Generic.Data.Internal.Meta as Lyxia
48import System.IO
49 42
50newtype AnnounceKey = AnnounceKey ByteString 43newtype AnnounceKey = AnnounceKey ByteString
51 deriving (Hashable,Ord,Eq) 44 deriving (Hashable,Ord,Eq)