X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matitaB%2Fcomponents%2Fcontent%2FnotationUtil.mli;h=981030d49d8cc160e1a7f0245bcba4962f23e1a5;hb=0c547d79d0edc850787ac27edc25565aa271ec2a;hp=ac291a2cebc72156afa5ffb44c54380a4a158832;hpb=cacbe3c6493ddce76c4c13379ade271d8dd172e8;p=helm.git

diff --git a/matitaB/components/content/notationUtil.mli b/matitaB/components/content/notationUtil.mli
index ac291a2ce..981030d49 100644
--- a/matitaB/components/content/notationUtil.mli
+++ b/matitaB/components/content/notationUtil.mli
@@ -33,6 +33,7 @@ val keywords_of_term: NotationPt.term -> string list
 
 val visit_ast:
   ?special_k:(NotationPt.term -> NotationPt.term) ->
+  ?clear_interpretation:bool ->
   ?map_xref_option:(NotationPt.href option -> NotationPt.href option) ->
   ?map_case_indty:(NotationPt.case_indtype option ->
           NotationPt.case_indtype option) ->
@@ -67,6 +68,7 @@ val get_idrefs: NotationPt.term -> string list
 val ncombine: 'a list list -> 'a list list
 
 val string_of_literal: NotationPt.literal -> string
+val html_of_literal: NotationPt.literal -> string 
 
 val dress:  sep:'a -> 'a list -> 'a list
 val dressn: sep:'a list -> 'a list -> 'a list