Experimental support for Russell (coercions moving inside lambda & pattern

[helm.git] / helm / software / components / ng_kernel / nUri.mli

diff --git a/helm/software/components/ng_kernel/nUri.mli b/helm/software/components/ng_kernel/nUri.mli
index c5f6333552cb707f15f1f064eb936f70d0dde427..323da90c3b60941e57c582637565be56996289cb 100644 (file)
--- a/helm/software/components/ng_kernel/nUri.mli
+++ b/helm/software/components/ng_kernel/nUri.mli
@@ -17,5 +17,7 @@ val string_of_uri: uri -> string
 val name_of_uri: uri -> string
 val uri_of_string: string -> uri
 val eq: uri -> uri -> bool
+val compare: uri -> uri -> int
 
 module UriHash: Hashtbl.S with type key = uri
+module UriMap: Map.S with type key = uri