Horrible workaround

[helm.git] / helm / software / components / lexicon / cicNotation.mli

diff --git a/helm/software/components/lexicon/cicNotation.mli b/helm/software/components/lexicon/cicNotation.mli
index 81b01aa45625364cb33310838c832d9ca7572f4e..9e231e3317a84f502e4e9558e57187dde8227536 100644 (file)
--- a/helm/software/components/lexicon/cicNotation.mli
+++ b/helm/software/components/lexicon/cicNotation.mli
@@ -25,6 +25,8 @@
 
 type notation_id
 
+val compare_notation_id : notation_id -> notation_id -> int
+
 val process_notation: LexiconAst.command -> notation_id list
 
 val remove_notation: notation_id -> unit
@@ -38,10 +40,5 @@ val get_all_notations: unit -> (notation_id * string) list  (* id, dsc *)
 val get_active_notations: unit -> notation_id list
 val set_active_notations: notation_id list -> unit
 
-(* resets internal couenters. this is an hack used in matitaScript.
- * if you are in the middle of a script (with an history you may use to undo
- * with some notations id inside) and you want to compile an external file 
- * in an empty environment you need, after its compilation, to restore
- * the previous environment (re-executing all notations commands) and this must
- * produce the same ids as before, otherwise history is wrong. *)
- val reset: unit -> unit
+val push: unit -> unit
+val pop: unit -> unit