From b2d466f40dbf40fa6404d98228325cf97da2748c Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sun, 26 Nov 2000 19:04:18 +0000
Subject: Prise en compte qualid

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

(limited to 'dev/top_printers.ml')

diff --git a/dev/top_printers.ml b/dev/top_printers.ml
index 990cab3b8b..4f0717b85d 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -47,6 +47,8 @@ let prj j = pP (genprj prjudge j)
 
 let prsp sp = pP[< 'sTR(string_of_path sp) >]
 
+let prqualid qid = pP[< pr_qualid qid >]
+
 let prgoal g = pP(prgl g)
 
 let prsigmagoal g = pP(prgl (sig_it g))
-- 
cgit v1.2.3