27 lines
1.3 KiB
OCaml
27 lines
1.3 KiB
OCaml
|
(****************************************************************************)
|
||
|
|
(* *)
|
||
|
|
(* Objective Caml *)
|
||
|
|
(* *)
|
||
|
|
(* INRIA Rocquencourt *)
|
||
|
|
(* *)
|
||
|
|
(* Copyright 2006 Institut National de Recherche en Informatique et *)
|
||
|
|
(* en Automatique. All rights reserved. This file is distributed under *)
|
||
|
|
(* the terms of the GNU Library General Public License, with the special *)
|
||
|
|
(* exception on linking described in LICENSE at the top of the Objective *)
|
||
|
|
(* Caml source tree. *)
|
||
|
|
(* *)
|
||
|
|
(****************************************************************************)
|
||
|
|
|
||
|
|
(* Authors:
|
||
|
|
* - Nicolas Pouillard: initial version
|
||
|
|
*)
|
||
|
|
|
||
|
|
(** Signature for errors modules, an Error modules can be registred with
|
||
|
|
the {!ErrorHandler.Register} functor in order to be well printed. *)
|
||
|
|
module type S = sig
|
||
|
|
type t = 'abstract;
|
||
|
|
exception E of t;
|
||
|
|
value to_string : t -> string;
|
||
|
|
value print : Format.formatter -> t -> unit;
|
||
|
|
end;
|