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
|
type 'a option =
| None
| Some of 'a
and 'a ref =
{ mutable contents: 'a }
#if OCAML_VERSION >= (4, 03, 0)
and 'a list =
| Nil
| Cons of 'a * 'a list
and ('a, 'b) result =
| Ok of 'a
| Error of 'b
#endif
[@@deriving
visitors { variety = "iter"; public = []; polymorphic = true; data = false; nude = true },
visitors { variety = "map"; public = []; polymorphic = true; data = false; nude = true },
visitors { variety = "endo"; public = []; polymorphic = true; data = false; nude = true },
visitors { variety = "reduce"; public = []; polymorphic = true; data = false; nude = true; ancestors = ["VisitorsRuntime.monoid"] },
visitors { variety = "mapreduce"; public = []; polymorphic = true; data = false; nude = true; ancestors = ["VisitorsRuntime.monoid"] },
visitors { variety = "iter2"; public = []; polymorphic = true; data = false; nude = true },
visitors { variety = "map2"; public = []; polymorphic = true; data = false; nude = true },
visitors { variety = "reduce2"; public = []; polymorphic = true; data = false; nude = true; ancestors = ["VisitorsRuntime.monoid"] },
visitors { variety = "mapreduce2"; public = []; polymorphic = true; data = false; nude = true; ancestors = ["VisitorsRuntime.monoid"] }
]
|
