firewall/utils.ml
2022-08-29 07:35:35 +02:00

4 lines
125 B
OCaml

let rec deoptionalise = function
| (Some x) :: xs -> x :: deoptionalise xs
| None :: xs -> deoptionalise xs
| [] -> []