summaryrefslogtreecommitdiff
path: root/TCPProber.hs
diff options
context:
space:
mode:
authorJoe Crayne <joe@jerkface.net>2019-01-16 22:53:41 -0500
committerJoe Crayne <joe@jerkface.net>2019-01-16 22:53:41 -0500
commit6ebe91b686ca8bef893f9a3dd704e45c04124b8f (patch)
treeaf27dcf06f07ddbbbbfc6073a0fdf60591fec90c /TCPProber.hs
parentb5df06bf0fed5a30a9b16e1032037e6cea378464 (diff)
kademlia: support for async search queries.
Diffstat (limited to 'TCPProber.hs')
-rw-r--r--TCPProber.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/TCPProber.hs b/TCPProber.hs
index baddb39e..5e011116 100644
--- a/TCPProber.hs
+++ b/TCPProber.hs
@@ -167,7 +167,7 @@ nodeSearch :: TCPProber -> TCP.TCPClient err Nonce8 -> Search NodeId (IP, PortNu
167nodeSearch prober tcp = Search 167nodeSearch prober tcp = Search
168 { searchSpace = TCP.tcpSpace 168 { searchSpace = TCP.tcpSpace
169 , searchNodeAddress = TCP.nodeIP &&& TCP.tcpPort 169 , searchNodeAddress = TCP.nodeIP &&& TCP.tcpPort
170 , searchQuery = getNodes prober tcp 170 , searchQuery = Left $ getNodes prober tcp
171 , searchAlpha = 8 171 , searchAlpha = 8
172 , searchK = 16 172 , searchK = 16
173 } 173 }