testallprims.ml 859 Bytes
Newer Older
1 2 3 4 5 6 7 8 9
type t =
  | Array of t array
  | Bool of bool
  | Bytes of bytes
  | Char of char
  | Float of float
  | Int of int
  | Int32 of int32
  | Int64 of int64
10
  | Lazy of t lazy_t
11 12 13 14 15 16 17 18 19 20
  | List of t list
  | Nativeint of nativeint
  | Option of t option
  | Ref of t ref
  | Result of (t, t) result
  | String of string
  | Unit of unit
  | Tuple2 of (t * t)
  | Tuple3 of (t * t * t)
[@@deriving
21 22 23 24 25 26 27
     visitors { variety = "iter"; concrete = true },
     visitors { variety = "map"; concrete = true },
     visitors { variety = "reduce"; ancestors=["VisitorsRuntime.addition_monoid"]; concrete = true },
     visitors { variety = "endo"; concrete = true },
     visitors { variety = "iter2"; concrete = true },
     visitors { variety = "map2"; concrete = true },
     visitors { variety = "reduce2"; ancestors=["VisitorsRuntime.addition_monoid"]; concrete = true }
28
]