From e8ef565dadd110329f806fa3c281055fcd807440 Mon Sep 17 00:00:00 2001
From: lmamane
Date: Fri, 22 Feb 2008 13:39:13 +0000
Subject: Merge with lmamane's private branch:  - New vernac command "Delete" 
 - New vernac command "Undo To"  - Added a few hooks used by new
 contrib/interface  - Beta/incomplete version of dependency generation and
 dumping

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

(limited to 'lib/util.mli')

diff --git a/lib/util.mli b/lib/util.mli
index ae1b906ce1..92822f770b 100644
--- a/lib/util.mli
+++ b/lib/util.mli
@@ -159,6 +159,7 @@ val list_cartesians : ('a -> 'b -> 'b) -> 'b -> 'a list list -> 'b list
 (* list_combinations [[a;b];[c;d]] returns [[a;c];[a;d];[b;c];[b;d]] *)
 val list_combinations : 'a list list -> 'a list list
 
+val list_union_map : ('a -> 'b -> 'b) -> 'a list -> 'b -> 'b
 
 (*s Arrays. *)
 
@@ -201,6 +202,7 @@ val array_fold_map' : ('a -> 'c -> 'b * 'c) -> 'a array -> 'c -> 'b array * 'c
 val array_fold_map2' :
   ('a -> 'b -> 'c -> 'd * 'c) -> 'a array -> 'b array -> 'c -> 'd array * 'c
 val array_distinct : 'a array -> bool
+val array_union_map : ('a -> 'b -> 'b) -> 'a array -> 'b -> 'b
 
 (*s Matrices *)
 
-- 
cgit v1.2.3