X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Fextlib%2FhExtlib.mli;h=594a80027956644cb721f3007a97c34a678adfa1;hb=6e785555b301cc1abe1671de3bd970aebebce71a;hp=1e2d8e04710ab55be1303d6c59b825bdceced20b;hpb=dd5a5cfcb19e3ef5059dbb2d777a6f147dd556a6;p=helm.git diff --git a/helm/software/components/extlib/hExtlib.mli b/helm/software/components/extlib/hExtlib.mli index 1e2d8e047..594a80027 100644 --- a/helm/software/components/extlib/hExtlib.mli +++ b/helm/software/components/extlib/hExtlib.mli @@ -108,6 +108,7 @@ val list_forall_default3: ('a -> 'b -> 'c -> bool) -> 'a list -> 'b list -> 'c - * @raise Failure when List.length l < n *) val split_nth: int -> 'a list -> 'a list * 'a list +val mk_list: 'a -> int -> 'a list (** {2 Debugging & Profiling} *) type profiler = { profile : 'a 'b. ('a -> 'b) -> 'a -> 'b }