X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fcontent_pres%2FcicNotationParser.mli;h=1ec1fd59cc333b3254e501b2ee57c3ac523efc13;hb=eaa8cd77b9060af69694327d609b18473b075f4d;hp=62262c14c5f66880115028f912099b40f1e1deae;hpb=30bbfa78612ca1ad0c131a75d7075cfd35bebbe1;p=helm.git

diff --git a/matita/components/content_pres/cicNotationParser.mli b/matita/components/content_pres/cicNotationParser.mli
index 62262c14c..1ec1fd59c 100644
--- a/matita/components/content_pres/cicNotationParser.mli
+++ b/matita/components/content_pres/cicNotationParser.mli
@@ -33,8 +33,9 @@ class type g_status =
   method notation_parser_db: db
  end
 
-class status: keywords:string list ->
+class virtual status: 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
@@ -42,6 +43,11 @@ class status: keywords:string list ->
 
 type checked_l1_pattern = private CL1P of NotationPt.term * int
 
+val refresh_uri_in_checked_l1_pattern:
+ refresh_uri_in_term:(NCic.term -> NCic.term) ->
+ refresh_uri_in_reference:(NReference.reference -> NReference.reference) ->
+  checked_l1_pattern -> checked_l1_pattern 
+
 (** {2 Parsing functions} *)
 
   (** concrete syntax pattern: notation level 1, the 
@@ -77,8 +83,6 @@ val let_defs : #status ->
 val protected_binder_vars : #status ->
   (NotationPt.term list * NotationPt.term option) Grammar.Entry.e
 
-val parse_term: #status -> Ulexing.lexbuf -> NotationPt.term
-
 (** {2 Debugging} *)
 
   (** print "level2_pattern" entry on stdout, flushing afterwards *)