mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 11:15:31 -05:00
remove dead code
This commit is contained in:
parent
18827b920b
commit
5713183a3a
1 changed files with 0 additions and 6 deletions
|
|
@ -13,8 +13,6 @@ let map_or ~default f = function
|
|||
| None -> default
|
||||
| Some x -> f x
|
||||
|
||||
let maybe f default = map_or ~default f
|
||||
|
||||
let is_some = function
|
||||
| None -> false
|
||||
| Some _ -> true
|
||||
|
|
@ -89,10 +87,6 @@ let fold f acc o = match o with
|
|||
| None -> acc
|
||||
| Some x -> f acc x
|
||||
|
||||
let get default x = match x with
|
||||
| None -> default
|
||||
| Some y -> y
|
||||
|
||||
let get_or ~default x = match x with
|
||||
| None -> default
|
||||
| Some y -> y
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue