diff options
Diffstat (limited to 'src/Network/BitTorrent/Exchange/Connection.hs')
-rw-r--r-- | src/Network/BitTorrent/Exchange/Connection.hs | 6 |
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 | ||
725 | rehandshake :: ExtendedCaps -> Wire s () | 725 | rehandshake :: ExtendedCaps -> Wire s () |
726 | rehandshake caps = undefined | 726 | rehandshake caps = error "rehandshake" |
727 | 727 | ||
728 | reconnect :: Wire s () | 728 | reconnect :: Wire s () |
729 | reconnect = undefined | 729 | reconnect = error "reconnect" |
730 | 730 | ||
731 | data ConnectionId = ConnectionId | 731 | data ConnectionId = ConnectionId |
732 | { topic :: !InfoHash | 732 | { topic :: !InfoHash |
@@ -751,7 +751,7 @@ instance Default ConnectionPrefs where | |||
751 | } | 751 | } |
752 | 752 | ||
753 | normalize :: ConnectionPrefs -> ConnectionPrefs | 753 | normalize :: ConnectionPrefs -> ConnectionPrefs |
754 | normalize = undefined | 754 | normalize = error "normalize" |
755 | 755 | ||
756 | -- | Bridge between 'Connection' and 'Network.BitTorrent.Exchange.Session'. | 756 | -- | Bridge between 'Connection' and 'Network.BitTorrent.Exchange.Session'. |
757 | data SessionLink s = SessionLink | 757 | data SessionLink s = SessionLink |