aboutsummaryrefslogtreecommitdiff
path: root/test/formatters/samplecode/ocp-indent/in.ml
blob: d6470680bfbeebd4e0075395c4e64ba789dd9aec (plain)
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
(* https://github.com/OCamlPro/ocp-indent/blob/master/tests/failing/list_of_funs.ml *)

let f x =
  (fun x -> x [ (fun () -> 3) ;
                (fun () -> 4) ])

let f x = (fun x -> x [ (fun () -> 3) ;
                        (fun () -> 4) ])

let f x =
  x [ (fun () -> 3) ;
      (fun () -> 4) ]

let f x =
  [ (fun () -> 3) ;
    (fun () -> 4) ]

let f x =
  (fun x -> x [ (fun () ->
                   3) ;
                (fun () -> 4) ])

let f x = (fun x -> x [ (fun () ->
                           3) ;
                        (fun () -> 4) ])

let f x =
  x [ (fun () ->
         3) ;
      (fun () -> 4) ]

let f x =
  [ (fun () ->
       3) ;
    (fun () -> 4) ]