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
---
 lib/errors.mli | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'lib/errors.mli')

diff --git a/lib/errors.mli b/lib/errors.mli
index d04ebb3fe7..3dd470a064 100644
--- a/lib/errors.mli
+++ b/lib/errors.mli
@@ -19,17 +19,17 @@ open Pp
 exception Anomaly of string * std_ppcmds
 val anomaly : string -> 'a
 val anomalylabstrm : string -> std_ppcmds -> 'a
-val anomaly_loc : loc * string * std_ppcmds -> 'a
+val anomaly_loc : Loc.t * string * std_ppcmds -> 'a
 
 exception UserError of string * std_ppcmds
 val error : string -> 'a
 val errorlabstrm : string -> std_ppcmds -> 'a
-val user_err_loc : loc * string * std_ppcmds -> 'a
+val user_err_loc : Loc.t * string * std_ppcmds -> 'a
 
 exception AlreadyDeclared of std_ppcmds
 val alreadydeclared : std_ppcmds -> 'a
 
-val invalid_arg_loc : loc * string -> 'a
+val invalid_arg_loc : Loc.t * string -> 'a
 
 (** [todo] is for running of an incomplete code its implementation is
    "do nothing" (or print a message), but this function should not be
@@ -45,7 +45,7 @@ exception Quit
    input buffer associated to the location of the error (or the module name
    if boolean is true), and the error itself. *)
 
-exception Error_in_file of string * (bool * string * loc) * exn
+exception Error_in_file of string * (bool * string * Loc.t) * exn
 
 (** [register_handler h] registers [h] as a handler.
     When an expression is printed with [print e], it
-- 
cgit v1.2.3