File: js_pattern.ml.ref

package info (click to toggle)
ocamlformat 0.29.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 14,820 kB
  • sloc: ml: 65,176; pascal: 4,877; lisp: 229; sh: 217; makefile: 121
file content (41 lines) | stat: -rw-r--r-- 620 bytes parent folder | download
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
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