diff options
Diffstat (limited to 'tools.ml')
-rwxr-xr-x | tools.ml | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -143,7 +143,7 @@ module List = struct | [] -> raise Not_found | hd::tl -> begin match f hd with | Some x -> x - | None -> find_map f tl + | None -> (find_map[@tailrec]) f tl end end |