diff options
| author | joe <joe@jerkface.net> | 2017-09-06 01:27:36 -0400 |
|---|---|---|
| committer | joe <joe@jerkface.net> | 2017-09-06 01:31:41 -0400 |
| commit | 921f845e56033b959247dc0347083e287963f677 (patch) | |
| tree | 4ff89d4186c255d38b0a59a7eb5b47ad521be299 /src/Network | |
| parent | 2423be0ebf0bcdc4568b251cd8f9a9830bf9b04f (diff) | |
Removed Data.Bits requirement for Kademlia node id.
Diffstat (limited to 'src/Network')
| -rw-r--r-- | src/Network/DHT/Routing.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Network/DHT/Routing.hs b/src/Network/DHT/Routing.hs index 85525a90..11dbd11e 100644 --- a/src/Network/DHT/Routing.hs +++ b/src/Network/DHT/Routing.hs | |||
| @@ -788,6 +788,8 @@ data KademliaSpace nid ni = KademliaSpace | |||
| 788 | , kademliaTestBit :: nid -> Word -> Bool | 788 | , kademliaTestBit :: nid -> Word -> Bool |
| 789 | -- | The Kademlia xor-metric. | 789 | -- | The Kademlia xor-metric. |
| 790 | , kademliaXor :: nid -> nid -> nid | 790 | , kademliaXor :: nid -> nid -> nid |
| 791 | |||
| 792 | , kademliaSample :: forall m. Applicative m => (Int -> m BS.ByteString) -> nid -> (Int,Word8,Word8) -> m nid | ||
| 791 | } | 793 | } |
| 792 | 794 | ||
| 793 | contramapKS f ks = ks | 795 | contramapKS f ks = ks |