1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
let f = function _ -> 0
let f x = match x with _ -> 0
let f = function _ -> 0
let f x = match x with _ -> 0
let f x =
begin match x with _ -> 0
end
let check_price t = function
| { Exec.trade_at_settlement = None | Some false } -> ()
let check_price t = function simpler -> () | other -> ()
(* Sometimes we like to write big alternations like this, in which case the
comment should typically align with the following clause. *)
let 0 = match x with A (* a *) -> a
let 0 = match x with A (* a *) -> a
let _ = a || match a with a -> true | b -> false
|
