X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite%2FgrafiteAstPp.mli;h=647d38bbe22a35cb93f1f60ac8f134876e7c4186;hb=1ca749a387695a5a4abc138a06de496a63abac4a;hp=7478883aa7fc11df76a0250c0d332e7838693873;hpb=7b4d519aefac94afb371a7e4da94779b40bf8608;p=helm.git

diff --git a/helm/software/components/grafite/grafiteAstPp.mli b/helm/software/components/grafite/grafiteAstPp.mli
index 7478883aa..647d38bbe 100644
--- a/helm/software/components/grafite/grafiteAstPp.mli
+++ b/helm/software/components/grafite/grafiteAstPp.mli
@@ -24,6 +24,7 @@
  *)
 
 val pp_tactic:
+  map_unicode_to_tex:bool ->
   term_pp:('term -> string) ->
   lazy_term_pp:('lazy_term -> string) ->
   ('term, 'lazy_term, 'term GrafiteAst.reduction, string)
@@ -31,6 +32,7 @@ val pp_tactic:
     string
 
 val pp_tactic_pattern:
+  map_unicode_to_tex:bool ->
   term_pp:('term -> string) ->
   lazy_term_pp:('lazy_term -> string) ->
   ('term, 'lazy_term, string) GrafiteAst.pattern ->
@@ -47,6 +49,7 @@ val pp_command:
    ('term,'obj) GrafiteAst.command -> string
 val pp_macro: term_pp:('term -> string) -> 'term GrafiteAst.macro -> string
 val pp_comment:
+  map_unicode_to_tex:bool ->
   term_pp:('term -> string) ->
   lazy_term_pp:('lazy_term -> string) ->
   obj_pp:('obj -> string) ->
@@ -55,6 +58,7 @@ val pp_comment:
     string
 
 val pp_executable:
+  map_unicode_to_tex:bool ->
   term_pp:('term -> string) ->
   lazy_term_pp:('lazy_term -> string) ->
   obj_pp:('obj -> string) ->
@@ -68,12 +72,13 @@ val pp_statement:
   obj_pp:('obj -> string) ->
   ('term, 'lazy_term, 'term GrafiteAst.reduction, 'obj, string)
   GrafiteAst.statement ->
+  map_unicode_to_tex:bool ->
     string
 
-val pp_tactical:
+val pp_punctuation_tactical:
   term_pp:('term -> string) ->
   lazy_term_pp:('lazy_term -> string) ->
   ('term, 'lazy_term, 'term GrafiteAst.reduction, string)
-  GrafiteAst.tactical ->
+  GrafiteAst.punctuation_tactical ->
     string