From cf5355535e5138449b7b5ea688ce26d907d47a34 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 27 Feb 2003 13:40:31 +0000
Subject: Retour nouvel afficheur

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3709 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 parsing/ppconstr.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/parsing/ppconstr.ml b/parsing/ppconstr.ml
index 57e8136322..fb99e8dd69 100644
--- a/parsing/ppconstr.ml
+++ b/parsing/ppconstr.ml
@@ -410,10 +410,10 @@ let gentermpr gt =
 
 (* [at_top] means ids of env must be avoided in bound variables *)
 
+(*
 let gentermpr_core at_top env t =
   gentermpr (Termast.ast_of_constr at_top env t)
-(*
+*)
 let gentermpr_core at_top env t =
   pr_constr (Constrextern.extern_constr at_top env t)
-*)
   
-- 
cgit v1.2.3