summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/Tracker/RPC/Message.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/BitTorrent/Tracker/RPC/Message.hs')
-rw-r--r--src/Network/BitTorrent/Tracker/RPC/Message.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Network/BitTorrent/Tracker/RPC/Message.hs b/src/Network/BitTorrent/Tracker/RPC/Message.hs
index e91d223e..26868ead 100644
--- a/src/Network/BitTorrent/Tracker/RPC/Message.hs
+++ b/src/Network/BitTorrent/Tracker/RPC/Message.hs
@@ -475,9 +475,6 @@ parseFailureMessage e = BS.concat $ case e of
475parseFailureStatus :: ParamParseFailure -> Status 475parseFailureStatus :: ParamParseFailure -> Status
476parseFailureStatus = mkStatus <$> parseFailureCode <*> parseFailureMessage 476parseFailureStatus = mkStatus <$> parseFailureCode <*> parseFailureMessage
477 477
478--type AnnounceResponse = Either Status AnnounceInfo -- TODO
479--type TrackerResponse = () -- TODO
480
481{----------------------------------------------------------------------- 478{-----------------------------------------------------------------------
482 Scrape message 479 Scrape message
483-----------------------------------------------------------------------} 480-----------------------------------------------------------------------}