prima implementazione di demodulate, superposition_left e superposition_right

[helm.git] / helm / ocaml / cic_proof_checking / cicEnvironment.mli

diff --git a/helm/ocaml/cic_proof_checking/cicEnvironment.mli b/helm/ocaml/cic_proof_checking/cicEnvironment.mli
index 5c10c81a37ea150f77be59597f6762de3363ea0c..6108467b5124b079f659477810e658e92b2868f9 100644 (file)
--- a/helm/ocaml/cic_proof_checking/cicEnvironment.mli
+++ b/helm/ocaml/cic_proof_checking/cicEnvironment.mli
@@ -41,7 +41,6 @@ exception Object_not_found of UriManager.uri;;
 
 (* as the get cooked, but if not present the object is only fetched,
  * not unfreezed and committed 
- * @raise Object_not_found
  *)
 val get_obj : 
   CicUniv.universe_graph -> UriManager.uri ->   
@@ -83,10 +82,10 @@ val set_type_checking_info :
 val add_type_checked_term : 
   UriManager.uri -> (Cic.obj * CicUniv.universe_graph) -> unit
 
-  (** remove a type checked term
-  * @raise Term_not_found when given term is not in the environment
+  (** remove a type checked object
+  * @raise Object_not_found when given term is not in the environment
   * @raise Failure when remove_term is invoked while type checking *)
-val remove_term: UriManager.uri -> unit
+val remove_obj: UriManager.uri -> unit
 
 (* get_cooked_obj ~trust uri                                        *)
 (* returns the object if it is already type-checked or if it can be *)
@@ -127,4 +126,7 @@ val list_uri: unit -> UriManager.uri list
   (** @return true for objects available in the library *)
 val in_library: UriManager.uri -> bool
 
+  (** total parsing time, only to benchmark the parser *)
+val total_parsing_time: float ref
+
 (* EOF *)