1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
|
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
|
