Added an hook useful in many situations.

[helm.git] / components / library / librarySync.mli

diff --git a/components/library/librarySync.mli b/components/library/librarySync.mli
index a836dfd5788df205ac27ffd35ef539bd80dc05f0..d8e432e75b9035888478ed3d1277dbe730344dcc 100644 (file)
--- a/components/library/librarySync.mli
+++ b/components/library/librarySync.mli
@@ -25,6 +25,8 @@
 
 exception AlreadyDefined of UriManager.uri
 
+val set_object_declaration_hook : (UriManager.uri -> Cic.obj -> unit) -> unit
+
 (* this is a pointer to the function which builds the inversion principle *)
 val build_inversion_principle: (UriManager.uri-> Cic.obj -> (UriManager.uri * Cic.obj) list) ref
 
@@ -48,8 +50,8 @@ val remove_obj: UriManager.uri -> unit
 val add_coercion: 
   add_composites:bool -> 
   RefinementTool.kit -> UriManager.uri -> int (* arity *) ->
-   string (* baseuri *) ->
-    UriManager.uri list
+   int (* saturations *) -> string (* baseuri *) ->
+    (UriManager.uri * int * int) list (* URI, arity, saturations *)
 
 (* inverse of add_coercion, removes both the eventually created composite   *)
 (* coercions and the information that [uri] and the composites are coercion *)