From bd1e31d0e3f20e82778306bd27e0b0f8cd475757 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sat, 12 Feb 2005 11:20:58 +0000
Subject: Ajout Print Canonical Structures

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

(limited to 'contrib/interface')

diff --git a/contrib/interface/xlate.ml b/contrib/interface/xlate.ml
index 365c234ae3..f0cdc49aee 100644
--- a/contrib/interface/xlate.ml
+++ b/contrib/interface/xlate.ml
@@ -1785,6 +1785,8 @@ let rec xlate_vernac =
 	| PrintCoercions -> CT_print_coercions
 	| PrintCoercionPaths (id1, id2) -> 
 	    CT_print_path (xlate_class id1, xlate_class id2)
+	| PrintCanonicalStructures ->
+	    xlate_error "TODO: Print Canonical Structures"
 	| PrintInspect n -> CT_inspect (CT_int n)
 	| PrintUniverses opt_s -> CT_print_universes(ctf_STRING_OPT opt_s)
 	| PrintLocalContext -> CT_print
-- 
cgit v1.2.3