diff options
author | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-10-30 12:18:11 +0100 |
---|---|---|
committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-11-02 11:19:07 +0100 |
commit | fb57fefa5f46ba8ad7be98cff81354389d87d402 (patch) | |
tree | 6856be3445e5fafb2c919d71cee933053cbacbc3 /plugins/ltac/pptactic.mli | |
parent | 0c268f5363ce7f72e85626b73082012b4e879d74 (diff) |
Exporting a few more printing functions.
Diffstat (limited to 'plugins/ltac/pptactic.mli')
-rw-r--r-- | plugins/ltac/pptactic.mli | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/plugins/ltac/pptactic.mli b/plugins/ltac/pptactic.mli index d9da954fe..058b20569 100644 --- a/plugins/ltac/pptactic.mli +++ b/plugins/ltac/pptactic.mli @@ -69,11 +69,16 @@ val pr_may_eval : val pr_and_short_name : ('a -> Pp.t) -> 'a and_short_name -> Pp.t val pr_or_by_notation : ('a -> Pp.t) -> 'a or_by_notation -> Pp.t +val pr_evaluable_reference_env : env -> evaluable_global_reference -> Pp.t + +val pr_quantified_hypothesis : quantified_hypothesis -> Pp.t + val pr_in_clause : ('a -> Pp.t) -> 'a Locus.clause_expr -> Pp.t -val pr_clauses : bool option -> +val pr_clauses : (* default: *) bool option -> ('a -> Pp.t) -> 'a Locus.clause_expr -> Pp.t + (* Some true = default is concl; Some false = default is all; None = no default *) val pr_raw_generic : env -> rlevel generic_argument -> Pp.t |