]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/library/librarySync.mli
extlib list_uniq instead of local copy
[helm.git] / helm / software / components / library / librarySync.mli
index 980e4724a990de49ba049a97c7b6bcf3ca2c3f5c..9dd3f5c3c55d687386f3387504eb3d828e185c28 100644 (file)
@@ -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
 
@@ -55,6 +57,8 @@ val add_coercion:
 (* coercions and the information that [uri] and the composites are coercion *)
 val remove_coercion: UriManager.uri -> unit
 
-(* mh... *)
+(* this is used when resetting, but the more gracefull push/pop can be used to
+ * suspend/resume an execution *)
 val remove_all_coercions: unit -> unit
-
+val push: unit -> unit
+val pop: unit -> unit