X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fcontent_pres%2FcicNotationParser.mli;h=5d2014b020cef683c800c759ae218d6c8332c5a6;hb=712af5b8dc7dab1ebfa6532b73b91c96cb4c6837;hp=8f2311cf0da1af1879a16fc57d5f1e60fa8b1201;hpb=db63f65c35efaa93d0a2cc00a194549e791975c9;p=helm.git

diff --git a/matita/components/content_pres/cicNotationParser.mli b/matita/components/content_pres/cicNotationParser.mli
index 8f2311cf0..5d2014b02 100644
--- a/matita/components/content_pres/cicNotationParser.mli
+++ b/matita/components/content_pres/cicNotationParser.mli
@@ -38,7 +38,7 @@ class virtual status: keywords:string list ->
   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 set_notation_parser_status: 'status. (#g_status as 'status) -> 'self
  end
 
 type checked_l1_pattern = private CL1P of NotationPt.term * int
@@ -64,7 +64,7 @@ val check_l1_pattern: (* level1_pattern, pponly, precedence, assoc *)
  NotationPt.term -> bool ->  int -> Gramext.g_assoc -> checked_l1_pattern
 
 val extend:
-  #status as 'status -> 
+  (#status as 'status) -> 
   checked_l1_pattern ->
   (NotationEnv.t -> NotationPt.location -> NotationPt.term) ->
     'status