firewall/utils.ml

5 lines
125 B
OCaml
Raw Normal View History

2022-08-29 07:01:56 +02:00
let rec deoptionalise = function
| (Some x) :: xs -> x :: deoptionalise xs
| None :: xs -> deoptionalise xs
| [] -> []