X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite%2FgrafiteAstPp.mli;h=4ae11a59b3fa64df67f46f150fd583fe300dac50;hb=8156d113837e31604dd91340f58c4dc8c155503a;hp=647d38bbe22a35cb93f1f60ac8f134876e7c4186;hpb=397b5f9d848e63a9703a1f90faf9869092ec8893;p=helm.git

diff --git a/helm/software/components/grafite/grafiteAstPp.mli b/helm/software/components/grafite/grafiteAstPp.mli
index 647d38bbe..4ae11a59b 100644
--- a/helm/software/components/grafite/grafiteAstPp.mli
+++ b/helm/software/components/grafite/grafiteAstPp.mli
@@ -47,7 +47,10 @@ val pp_command:
  term_pp:('term -> string) ->
   obj_pp:('obj -> string) ->
    ('term,'obj) GrafiteAst.command -> string
-val pp_macro: term_pp:('term -> string) -> 'term GrafiteAst.macro -> string
+val pp_macro: 
+  term_pp:('term -> string) -> 
+  lazy_term_pp:('lazy_term -> string) ->
+    ('term,'lazy_term) GrafiteAst.macro -> string
 val pp_comment:
   map_unicode_to_tex:bool ->
   term_pp:('term -> string) ->
@@ -75,10 +78,5 @@ val pp_statement:
   map_unicode_to_tex:bool ->
     string
 
-val pp_punctuation_tactical:
-  term_pp:('term -> string) ->
-  lazy_term_pp:('lazy_term -> string) ->
-  ('term, 'lazy_term, 'term GrafiteAst.reduction, string)
-  GrafiteAst.punctuation_tactical ->
-    string
+val pp_punctuation_tactical: GrafiteAst.punctuation_tactical -> string