From 4eba5c485defc6f14e7e6e11e4b157011a2017fb Mon Sep 17 00:00:00 2001 From: puech Date: Fri, 29 Jul 2011 14:25:10 +0000 Subject: Evarutil: generic equality on constr replaced by eq_constr (x2) added array_equal in Util git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14323 85f007b7-540e-0410-9357-904b9bb8a0f7 --- lib/util.mli | 1 + 1 file changed, 1 insertion(+) (limited to 'lib/util.mli') diff --git a/lib/util.mli b/lib/util.mli index 458eb1d05..8606d830f 100644 --- a/lib/util.mli +++ b/lib/util.mli @@ -237,6 +237,7 @@ val list_union_map : ('a -> 'b -> 'b) -> 'a list -> 'b -> 'b (** {6 Arrays. } *) val array_compare : ('a -> 'a -> int) -> 'a array -> 'a array -> int +val array_equal : ('a -> 'a -> bool) -> 'a array -> 'a array -> bool val array_exists : ('a -> bool) -> 'a array -> bool val array_for_all : ('a -> bool) -> 'a array -> bool val array_for_all2 : ('a -> 'b -> bool) -> 'a array -> 'b array -> bool -- cgit v1.2.3