From c7a0568967a8a6e40888a2106b9b59325f2f09a5 Mon Sep 17 00:00:00 2001 From: Hugo Herbelin Date: Thu, 26 Jan 2017 13:24:04 +0100 Subject: Adding a printer for Proof.proof reflecting the focusing layout. This is a modest contribution serving before all the purpose of displaying the focus stack and the shelf and give_up list. It does not print the sigma (while it could). Any improvements are welcome. --- proofs/proof.mli | 2 ++ 1 file changed, 2 insertions(+) (limited to 'proofs/proof.mli') diff --git a/proofs/proof.mli b/proofs/proof.mli index 5053fc7fb..8dc165e72 100644 --- a/proofs/proof.mli +++ b/proofs/proof.mli @@ -182,6 +182,8 @@ val in_proof : proof -> (Evd.evar_map -> 'a) -> 'a focused goals. *) val unshelve : proof -> proof +val pr_proof : proof -> Pp.std_ppcmds + (*** Compatibility layer with <=v8.2 ***) module V82 : sig val subgoals : proof -> Goal.goal list Evd.sigma -- cgit v1.2.3