From 11987749fc6e6d3e53ea737d46d5ab13a16faeb8 Mon Sep 17 00:00:00 2001 From: James Crayne Date: Sat, 28 Sep 2019 13:43:29 -0400 Subject: Factor out some new libraries word64-map: Data.Word64Map network-addr: Network.Address tox-crypto: Crypto.Tox lifted-concurrent: Control.Concurrent.Lifted.Instrument Control.Concurrent.Async.Lifted.Instrument psq-wrap: Data.Wrapper.PSQInt Data.Wrapper.PSQ minmax-psq: Data.MinMaxPSQ tasks: Control.Concurrent.Tasks kad: Network.Kademlia Network.Kademlia.Bootstrap Network.Kademlia.Routing Network.Kademlia.CommonAPI Network.Kademlia.Persistence Network.Kademlia.Search --- .../tests/Network/BitTorrent/Client/HandleSpec.hs | 19 ------------------- 1 file changed, 19 deletions(-) delete mode 100644 bittorrent/tests/Network/BitTorrent/Client/HandleSpec.hs (limited to 'bittorrent/tests/Network/BitTorrent/Client/HandleSpec.hs') diff --git a/bittorrent/tests/Network/BitTorrent/Client/HandleSpec.hs b/bittorrent/tests/Network/BitTorrent/Client/HandleSpec.hs deleted file mode 100644 index d51bab02..00000000 --- a/bittorrent/tests/Network/BitTorrent/Client/HandleSpec.hs +++ /dev/null @@ -1,19 +0,0 @@ -module Network.BitTorrent.Client.HandleSpec (spec) where -import Data.Default -import Test.Hspec - -import Data.Torrent -import Network.BitTorrent.Client -import Network.BitTorrent.Client.Handle - -data_dir :: FilePath -data_dir = "data" - -spec :: Spec -spec = do - describe "openMagnet" $ do - it "should add new infohash to index" $ do - simpleClient $ do - _ <- openMagnet data_dir (nullMagnet def) - _ <- getHandle def - return () -- cgit v1.2.3