From 27ea35bafdf0aefe1dcf49dfed1a18c3f158efa5 Mon Sep 17 00:00:00 2001 From: herbelin Date: Sat, 28 Apr 2007 13:56:03 +0000 Subject: Ajout de la possibilité de faire référence dans certains cas à un nom par sa notation (p.ex. pour unfold ou pour lazy delta). Ex: Goal 3+4 = 7. unfold "+". git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9804 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 afa11d31dc..8a406519e8 100644 --- a/lib/util.mli +++ b/lib/util.mli @@ -216,6 +216,7 @@ val option_fold_left2 : ('a -> 'b -> 'c -> 'a) -> 'a -> 'b option -> val option_iter : ('a -> unit) -> 'a option -> unit val option_compare : ('a -> 'b -> bool) -> 'a option -> 'b option -> bool val option_smartmap : ('a -> 'a) -> 'a option -> 'a option +val filter_some : 'a option list -> 'a list (* In [map_succeed f l] an element [a] is removed if [f a] raises *) (* [Failure _] otherwise behaves as [List.map f l] *) -- cgit v1.2.3