From 6b45f2d36929162cf92272bb60c2c245d9a0ead3 Mon Sep 17 00:00:00 2001
From: ppedrot
Date: Fri, 22 Jun 2012 15:14:30 +0000
Subject: Added an indirection with respect to Loc in Compat. As many [open
 Compat] were closed (i.e. the only remaining ones are those of
 printing/parsing). Meanwhile, a simplified interface is provided in loc.mli.

This also permits to put Pp in Clib, because it does not depend on
CAMLP4/5 anymore.

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15475 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 plugins/syntax/r_syntax.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'plugins/syntax/r_syntax.ml')

diff --git a/plugins/syntax/r_syntax.ml b/plugins/syntax/r_syntax.ml
index f8161c52fd..4e0a206ddc 100644
--- a/plugins/syntax/r_syntax.ml
+++ b/plugins/syntax/r_syntax.ml
@@ -118,8 +118,8 @@ let uninterp_r p =
 let _ = Notation.declare_numeral_interpreter "R_scope"
   (r_path,["Coq";"Reals";"Rdefinitions"])
   r_of_int
-  ([GRef(dummy_loc,glob_Ropp);GRef(dummy_loc,glob_R0);
-    GRef(dummy_loc,glob_Rplus);GRef(dummy_loc,glob_Rmult);
-    GRef(dummy_loc,glob_R1)],
+  ([GRef(Loc.ghost,glob_Ropp);GRef(Loc.ghost,glob_R0);
+    GRef(Loc.ghost,glob_Rplus);GRef(Loc.ghost,glob_Rmult);
+    GRef(Loc.ghost,glob_R1)],
     uninterp_r,
     false)
-- 
cgit v1.2.3