JsonSchema.Variant
module Map : sig ... end
type t = {
map : Map.t list; | (* The map of discriminant value to schema to use for parsing.. *) |
discriminant : string; | (* The name of the type discriminant property. *) |
}
val map : ( t, Map.t list ) GapiLens.t
val discriminant : ( t, string ) GapiLens.t
val empty : t
val render : t -> GapiJson.json_data_model list
val parse : t -> GapiJson.json_data_model -> t