From a1b715a8ef3984161f4ed306157ee539990cd8c5 Mon Sep 17 00:00:00 2001
From: barras
Date: Thu, 16 Oct 2003 15:59:19 +0000
Subject: oups! ca compile maintenant

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

diff --git a/toplevel/vernac.ml b/toplevel/vernac.ml
index 1308b7c701..c2342d7937 100644
--- a/toplevel/vernac.ml
+++ b/toplevel/vernac.ml
@@ -106,10 +106,10 @@ let set_formatter_translator() =
   let out s b e =
     let n = e-b in
     if n > 0 then begin
-      (match !last with
+      (match !last_char with
           '.' -> if s.[b] = '(' then output ch " " 0 1 
         | _ -> ());
-      last := s.[e-1]
+      last_char := s.[e-1]
     end;
     output ch s b e
   in
-- 
cgit v1.2.3