From c864319d90c8ea90432fb35198b73287ac54ecc2 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 5 Dec 2002 19:41:01 +0000
Subject: Ajout affichage fconstr

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3382 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 dev/top_printers.ml | 1 +
 1 file changed, 1 insertion(+)

(limited to 'dev/top_printers.ml')

diff --git a/dev/top_printers.ml b/dev/top_printers.ml
index e936fc40f3..321a095d0b 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -290,3 +290,4 @@ let _ =
        | _ -> bad_vernac_args "PrintPureConstr")
 *)
 
+let ppfconstr c = ppterm (Closure.term_of_fconstr c)
-- 
cgit v1.2.3