diff options
| author |  jforest <jforest@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-07-18 08:50:23 +0000 |
|---|---|---|
| committer | jforest <jforest@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-07-18 08:50:23 +0000 |
| commit | c048e93a80ce58e72ab5297341be435edbd154ad (patch) | |
| tree | 86a7913d87a52dd93b00980d5483b5f3a136b634 /contrib/funind/indfun_common.mli | |
| parent | f16545cc950129ec44c45d7f8cecf9f0e7cd48d1 (diff) | |
Code cleaning in Function
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9053 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/funind/indfun_common.mli')
| -rw-r--r-- | contrib/funind/indfun_common.mli | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/contrib/funind/indfun_common.mli b/contrib/funind/indfun_common.mli index 00e1ce8d9..2142d29b3 100644 --- a/contrib/funind/indfun_common.mli +++ b/contrib/funind/indfun_common.mli @@ -73,6 +73,12 @@ val get_proof_clean : bool -> +(* [with_full_print f a] applies [f] to [a] in full printing environment + + This function preserves the print settings +*) +val with_full_print : ('a -> 'b) -> 'a -> 'b + (*****************) @@ -103,3 +109,4 @@ val pr_table : unit -> Pp.std_ppcmds val function_debug : bool ref val do_observe : unit -> bool + |