From f5186fa528bf9c79533d4c4ee1a3846eab4fc6be Mon Sep 17 00:00:00 2001 From: joe Date: Fri, 14 Jul 2017 23:50:39 -0400 Subject: Removed ip polymorphism from PeerAddr type. --- src/Data/Torrent.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/Data') diff --git a/src/Data/Torrent.hs b/src/Data/Torrent.hs index b3bf0ec7..73422a04 100644 --- a/src/Data/Torrent.hs +++ b/src/Data/Torrent.hs @@ -239,10 +239,12 @@ instance BEncode InfoHash where fromBEncode be = InfoHash <$> fromBEncode be #endif +#if 0 instance TableKey KMessageOf InfoHash where toNodeId = either (error msg) id . S.decode . S.encode where -- TODO unsafe coerse? msg = "tableKey: impossible" +#endif -- | Convert to\/from raw bytestring. (no encoding) -- cgit v1.2.3