interim version (added smallLexer)

[helm.git] / matitaB / components / content_pres / cicNotationLexer.mli

diff --git a/matitaB/components/content_pres/cicNotationLexer.mli b/matitaB/components/content_pres/cicNotationLexer.mli
index 3bb42f5cbb9f602a6beedda6e2be96bbaf3f4c76..13f0150a8970da102d5794d4d43d4bb69d723a93 100644 (file)
--- a/matitaB/components/content_pres/cicNotationLexer.mli
+++ b/matitaB/components/content_pres/cicNotationLexer.mli
@@ -28,12 +28,18 @@
    * error message *)
 exception Error of int * int * string
 
+module LocalizeEnv :
+sig
+  include Map.S with type key = Stdpp.location
+end
+
 type lexers = {
-        level1_pattern_lexer : (string * string) Token.glexer;
-        level2_ast_lexer : (string * string) Token.glexer;
-        level2_meta_lexer : (string * string) Token.glexer
+      level1_pattern_lexer : (string * string) Token.glexer;
+      level2_ast_lexer : (string * string) Token.glexer;
+      level2_meta_lexer : (string * string) Token.glexer
 }
 
-val mk_lexers : string list -> lexers
+val mk_lexers : 
+  (string option * string option) LocalizeEnv.t ref -> string list -> lexers