From 34e73d0e0e1e997a05307eaa2fab97d694271efa Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 12 Jun 2003 15:57:48 +0000
Subject: Ajout option translate_syntax pour caractériser l'interprétation du
 traducteur à proprement parler

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

(limited to 'translate')

diff --git a/translate/ppvernacnew.ml b/translate/ppvernacnew.ml
index 83690598d8..f6577dc143 100644
--- a/translate/ppvernacnew.ml
+++ b/translate/ppvernacnew.ml
@@ -771,7 +771,7 @@ let rec pr_vernac = function
       (if i = 1 then mt() else int i ++ str ": ") ++
       (if !Options.p1 then mt () else str "By ") ++
       (if deftac then mt() else str "!! ") ++
-      pr_raw_tactic_goal i tac
+      Options.with_option Options.translate_syntax (pr_raw_tactic_goal i) tac
   | VernacSolveExistential (i,c) ->
       str"Existential " ++ int i ++ pr_lconstrarg c
 
-- 
cgit v1.2.3