added re-hash-consing of URIs embedded in universes

[helm.git] / helm / ocaml / cic / cicUniv.mli

diff --git a/helm/ocaml/cic/cicUniv.mli b/helm/ocaml/cic/cicUniv.mli
index 71ad1ef00b7b73f5e10092c97f723d4ffcfc50d7..d2b2483a19b5b331b7c9a601d5ebe674e9051950 100644 (file)
--- a/helm/ocaml/cic/cicUniv.mli
+++ b/helm/ocaml/cic/cicUniv.mli
@@ -113,6 +113,11 @@ val ugraph_of_xml:
 val restart_numbering:
   unit -> unit
 
+  (** re-hash-cons URIs contained in the given universe so that phisicaly
+   * equality could be enforced. Mainly used by
+   * CicEnvironment.restore_from_channel *)
+val recons_graph: universe_graph -> universe_graph
+
 (*
   Benchmarking stuff
 *)