diff --git a/utils.ml b/utils.ml index 12a4eb2..304b823 100644 --- a/utils.ml +++ b/utils.ml @@ -1,4 +1,4 @@ let rec deoptionalise = function - | (Some x) :: xs -> x :: deoptionalise xs + | Some x :: xs -> x :: deoptionalise xs | None :: xs -> deoptionalise xs | [] -> []