From a427e5e61ee97b58a95953518918842408390ce2 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 3 Mar 2003 14:03:20 +0000
Subject: Retour vieil afficheur

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3727 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 fb99e8dd69..57e8136322 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