From e7bef8ffabe48952aea91b49ccaa95e6e9f44d19 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Fri, 19 Sep 2003 00:00:23 +0000
Subject: parsing

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

(limited to 'contrib/interface')

diff --git a/contrib/interface/xlate.ml b/contrib/interface/xlate.ml
index a245a4b635..88e419fa6f 100644
--- a/contrib/interface/xlate.ml
+++ b/contrib/interface/xlate.ml
@@ -1625,7 +1625,7 @@ let xlate_vernac =
 
    | VernacSyntaxExtension _ -> xlate_error "Syntax Extension not implemented"
 
-   | VernacInfix (false,str_assoc, n, str, id, false, _, None) ->
+   | VernacInfix (false,str_assoc, Some n, str, id, false, _, None) ->
       CT_infix (
        (match str_assoc with
         | Some Gramext.LeftA -> CT_lefta
-- 
cgit v1.2.3