camlspotter avatar camlspotter committed 62cf8cd

added List.find_opt

Comments (0)

Files changed (2)

   in
   from_to [] f t
 
+let find_opt f ls = try Some (List.find f ls) with Not_found -> None 
+
 let rec find_map_opt f = function
   | [] -> None
   | x::xs ->
 val from_to : int -> int -> int list
   (** [from_to f t = [f..t]] *)
 
+val find_opt : ('a -> bool) -> 'a list -> 'a option
 val find_map_opt : ('a -> 'b option) -> 'a list -> 'b option
 val filter_map : ('a -> 'b option) -> 'a list -> 'b list
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.