diff options
author | vgross <vgross@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-03-02 15:29:08 +0000 |
---|---|---|
committer | vgross <vgross@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-03-02 15:29:08 +0000 |
commit | 95dcebe76caf6a93289e484995760ec94111c7c8 (patch) | |
tree | 4f0e147cc5a7b3a66b7371442b46e6ed35a51853 /lib/util.mli | |
parent | 066a564021788e995eb166ad6ed6e55611d6f593 (diff) |
Heavy modifications on the widget and edition tab creation mechanism.
Overloading of GPack.notebook => Vector no longer needed
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11952 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/util.mli')
-rw-r--r-- | lib/util.mli | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/util.mli b/lib/util.mli index 1be7f807a..34e91215a 100644 --- a/lib/util.mli +++ b/lib/util.mli @@ -124,6 +124,8 @@ val list_map3 : ('a -> 'b -> 'c -> 'd) -> 'a list -> 'b list -> 'c list -> 'd list val list_map4 : ('a -> 'b -> 'c -> 'd -> 'e) -> 'a list -> 'b list -> 'c list -> 'd list -> 'e list +val list_filter_i : + (int -> 'a -> bool) -> 'a list -> 'a list (* [list_index] returns the 1st index of an element in a list (counting from 1) *) val list_index : 'a -> 'a list -> int (* [list_unique_index x l] returns [Not_found] if [x] doesn't occur exactly once *) |