From 89a82fa99972ce5cbcd6aca93294f5dea3f30a26 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Wed, 1 Oct 2003 10:33:33 +0000
Subject: Implantation de l'option 'format' des Notations

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4509 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 aea3bb39fd..283213ec0c 100644
--- a/translate/ppvernacnew.ml
+++ b/translate/ppvernacnew.ml
@@ -409,7 +409,7 @@ let pr_syntax_modifier = function
   | SetAssoc Gramext.NonA -> str"no associativity"
   | SetEntryType (x,typ) -> str x ++ spc() ++ pr_set_entry_type typ
   | SetOnlyParsing -> str"only parsing"
-  | SetFormat s -> str"format " ++ qsnew s
+  | SetFormat s -> str"format " ++ pr_located qsnew s
 
 let pr_syntax_modifiers = function
   | [] -> mt()
-- 
cgit v1.2.3