summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/Network/BitTorrent/Tracker/RPC/HTTPSpec.hs18
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/Network/BitTorrent/Tracker/RPC/HTTPSpec.hs b/tests/Network/BitTorrent/Tracker/RPC/HTTPSpec.hs
index 15c0ef4f..5288e304 100644
--- a/tests/Network/BitTorrent/Tracker/RPC/HTTPSpec.hs
+++ b/tests/Network/BitTorrent/Tracker/RPC/HTTPSpec.hs
@@ -23,7 +23,25 @@ validateInfo AnnounceQuery {..} AnnounceInfo {..} = do
23 23
24spec :: Spec 24spec :: Spec
25spec = parallel $ do 25spec = parallel $ do
26 describe "Manager" $ do
27 describe "newManager" $ do
28 it "" $ pending
29
30 describe "closeManager" $ do
31 it "" $ pending
32
33 describe "withManager" $ do
34 it "" $ pending
35
26 describe "RPC" $ do 36 describe "RPC" $ do
37 describe "announce" $ do
38 it "must fail on bad uri scheme" $ do
39 pending
40
41 describe "scrape" $ do
42 it "fail on bad uri scheme" $ do
43 pending
44
27 forM_ (L.filter isHttpTracker trackers) $ \ TrackerEntry {..} -> 45 forM_ (L.filter isHttpTracker trackers) $ \ TrackerEntry {..} ->
28 context trackerName $ do 46 context trackerName $ do
29 47