summaryrefslogtreecommitdiff
path: root/src/Network/BitTorrent/Exchange/Connection.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Network/BitTorrent/Exchange/Connection.hs')
-rw-r--r--src/Network/BitTorrent/Exchange/Connection.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Network/BitTorrent/Exchange/Connection.hs b/src/Network/BitTorrent/Exchange/Connection.hs
index b23eb08b..dde9a468 100644
--- a/src/Network/BitTorrent/Exchange/Connection.hs
+++ b/src/Network/BitTorrent/Exchange/Connection.hs
@@ -723,10 +723,10 @@ extendedHandshake caps = do
723 _ -> protocolError HandshakeRefused 723 _ -> protocolError HandshakeRefused
724 724
725rehandshake :: ExtendedCaps -> Wire s () 725rehandshake :: ExtendedCaps -> Wire s ()
726rehandshake caps = undefined 726rehandshake caps = error "rehandshake"
727 727
728reconnect :: Wire s () 728reconnect :: Wire s ()
729reconnect = undefined 729reconnect = error "reconnect"
730 730
731data ConnectionId = ConnectionId 731data ConnectionId = ConnectionId
732 { topic :: !InfoHash 732 { topic :: !InfoHash
@@ -751,7 +751,7 @@ instance Default ConnectionPrefs where
751 } 751 }
752 752
753normalize :: ConnectionPrefs -> ConnectionPrefs 753normalize :: ConnectionPrefs -> ConnectionPrefs
754normalize = undefined 754normalize = error "normalize"
755 755
756-- | Bridge between 'Connection' and 'Network.BitTorrent.Exchange.Session'. 756-- | Bridge between 'Connection' and 'Network.BitTorrent.Exchange.Session'.
757data SessionLink s = SessionLink 757data SessionLink s = SessionLink