diff options
-rw-r--r-- | kad/src/Network/Kademlia/CommonAPI.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/kad/src/Network/Kademlia/CommonAPI.hs b/kad/src/Network/Kademlia/CommonAPI.hs index 601be5d8..4714cecc 100644 --- a/kad/src/Network/Kademlia/CommonAPI.hs +++ b/kad/src/Network/Kademlia/CommonAPI.hs | |||
@@ -38,6 +38,7 @@ data DHT = forall nid ni. ( Show ni | |||
38 | , dhtSearches :: TVar (Map.Map (String,nid) (DHTSearch nid ni)) | 38 | , dhtSearches :: TVar (Map.Map (String,nid) (DHTSearch nid ni)) |
39 | , dhtFallbackNodes :: IO [ni] | 39 | , dhtFallbackNodes :: IO [ni] |
40 | , dhtBootstrap :: [ni] -> [ni] -> IO () | 40 | , dhtBootstrap :: [ni] -> [ni] -> IO () |
41 | , dhtShowHexId :: Maybe (nid -> String) | ||
41 | } | 42 | } |
42 | 43 | ||
43 | data DHTQuery nid ni = forall addr r tok. | 44 | data DHTQuery nid ni = forall addr r tok. |