package ocsigen-start

  1. Overview
  2. Docs
type t
val of_json : Deriving_Json_lexer.lexbuf -> t
val to_json : Buffer.t -> t -> unit
val json : t Deriving_Json.t
type y = [
  1. | `Almost_email
  2. | `Almost_phone
  3. | `Email
  4. | `Invalid
  5. | `Phone
]
val y_of_json_with_tag : Deriving_Json_lexer.lexbuf -> [ `Cst of int | `NCst of int ] -> y
val y_recognize : [ `Cst of int | `NCst of int ] -> bool
val y_of_json : Deriving_Json_lexer.lexbuf -> y
val y_to_json : Buffer.t -> y -> unit
val y_json : y Deriving_Json.t
val y : t -> y
val to_string : t -> string
val of_string : only_mail:bool -> string -> t