P2p: Fix Hashtbl for PeerRing
Export hash in INTERNAL_HASH. now Peer_id.Id is hashable
This commit is contained in:
parent
3683e948c1
commit
ce92f70883
@ -95,6 +95,8 @@ module type INDEXES = sig
|
|||||||
|
|
||||||
type t
|
type t
|
||||||
|
|
||||||
|
val hash : t -> int
|
||||||
|
|
||||||
val to_path: t -> string list -> string list
|
val to_path: t -> string list -> string list
|
||||||
val of_path: string list -> t option
|
val of_path: string list -> t option
|
||||||
val of_path_exn: string list -> t
|
val of_path_exn: string list -> t
|
||||||
|
@ -9,7 +9,6 @@
|
|||||||
|
|
||||||
module PeerRing = Ring.MakeTable(struct
|
module PeerRing = Ring.MakeTable(struct
|
||||||
include P2p_peer.Id
|
include P2p_peer.Id
|
||||||
let hash = Hashtbl.hash
|
|
||||||
end)
|
end)
|
||||||
|
|
||||||
module PatriciaTree(V:HashPtree.Value) = struct
|
module PatriciaTree(V:HashPtree.Value) = struct
|
||||||
|
Loading…
Reference in New Issue
Block a user