diff options
| author | filliatr | 2002-02-08 09:05:45 +0000 |
|---|---|---|
| committer | filliatr | 2002-02-08 09:05:45 +0000 |
| commit | d2a0862f34c51dd52db6be34ae1cf60a590c4e9a (patch) | |
| tree | 1f59ed844e1396d9cd70c119e3463010db327601 /contrib/correctness/putil.ml | |
| parent | eb2862a2221276c44a90ed195d896c836674a66a (diff) | |
affichages avec prterm_env et non prterm; deb_print pour vraiment ne rien faire si pas debug
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2462 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/correctness/putil.ml')
| -rw-r--r-- | contrib/correctness/putil.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/contrib/correctness/putil.ml b/contrib/correctness/putil.ml index dbb903ab1e..5aa497d7f8 100644 --- a/contrib/correctness/putil.ml +++ b/contrib/correctness/putil.ml @@ -232,7 +232,8 @@ and c_of_constr c = open Pp open Util -open Printer + +let prterm x = Printer.prterm_env (Global.env()) x let pp_pre = function [] -> (mt ()) |