From 3bb8e20dcabb74363315db5f85f9f8ba4ceb768f Mon Sep 17 00:00:00 2001
From: filliatr
Date: Mon, 16 Aug 1999 14:01:48 +0000
Subject: ancien names decoupe en names + sign

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 lib/util.mli | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'lib/util.mli')

diff --git a/lib/util.mli b/lib/util.mli
index 25b419be83..5d4c706b9a 100644
--- a/lib/util.mli
+++ b/lib/util.mli
@@ -3,6 +3,16 @@
 
 open Pp
 
+(* Errors *)
+
+exception Anomaly of string * std_ppcmds  (* System errors *)
+val anomaly : string -> 'a
+val anomalylabstrm : string -> std_ppcmds -> 'a
+
+exception UserError of string * std_ppcmds (* User errors *)
+val error : string -> 'a
+val errorlabstrm : string -> std_ppcmds -> 'a
+
 (* Strings *)
 
 val explode : string -> string list
@@ -10,6 +20,11 @@ val implode : string list -> string
 
 val parse_section_path : string -> string list * string * string
 
+(* Lists *)
+
+val intersect : 'a list -> 'a list -> 'a list
+val subtract : 'a list -> 'a list -> 'a list
+
 (* Pretty-printing *)
 
 val pr_spc : unit -> std_ppcmds
-- 
cgit v1.2.3