]> matita.cs.unibo.it Git - helm.git/blobdiff - matitaB/components/content_pres/cicNotationParser.mli
update in basic_2
[helm.git] / matitaB / components / content_pres / cicNotationParser.mli
index 1ec1fd59cc333b3254e501b2ee57c3ac523efc13..7ea722257f171f1760e94a61835b2feade58d5d4 100644 (file)
@@ -33,12 +33,13 @@ class type g_status =
   method notation_parser_db: db
  end
 
-class virtual status: keywords:string list ->
+class virtual status: string option -> keywords:string list ->
  object('self)
   inherit NCic.status
   inherit g_status
   method set_notation_parser_db: db -> 'self
   method set_notation_parser_status: 'status. #g_status as 'status -> 'self
+  method reset_loctable: unit -> unit
  end
 
 type checked_l1_pattern = private CL1P of NotationPt.term * int
@@ -79,6 +80,9 @@ val term : #status -> NotationPt.term Grammar.Entry.e
 val let_defs : #status ->
   (NotationPt.term NotationPt.capture_variable list * NotationPt.term NotationPt.capture_variable * NotationPt.term * int) list
     Grammar.Entry.e
+val let_codefs : #status ->
+  (NotationPt.term NotationPt.capture_variable list * NotationPt.term NotationPt.capture_variable * NotationPt.term * int) list
+    Grammar.Entry.e
 
 val protected_binder_vars : #status ->
   (NotationPt.term list * NotationPt.term option) Grammar.Entry.e