Module Yojson.Safe

type t = [
  1. | `Assoc of (string * t) list
  2. | `Bool of bool
  3. | `Float of float
  4. | `Int of int
  5. | `Intlit of string
  6. | `List of t list
  7. | `Null
  8. | `String of string
  9. | `Tuple of t list
  10. | `Variant of string * t option
]
val pp : Format.formatter -> t -> unit
val show : t -> string
val equal : t -> t -> bool
val to_basic : t -> Yojson__.Basic.t
val to_string : ?buf:Buffer.t -> ?len:int -> ?suf:string -> ?std:bool -> t -> string
val to_channel : ?buf:Buffer.t -> ?len:int -> ?suf:string -> ?std:bool -> out_channel -> t -> unit
val to_output : ?buf:Buffer.t -> ?len:int -> ?suf:string -> ?std:bool -> < output : string -> int -> int -> int.. > -> t -> unit
val to_file : ?len:int -> ?std:bool -> ?suf:string -> string -> t -> unit
val to_buffer : ?suf:string -> ?std:bool -> Buffer.t -> t -> unit
val seq_to_string : ?buf:Buffer.t -> ?len:int -> ?suf:string -> ?std:bool -> t Seq.t -> string
val seq_to_channel : ?buf:Buffer.t -> ?len:int -> ?suf:string -> ?std:bool -> out_channel -> t Seq.t -> unit
val seq_to_file : ?len:int -> ?suf:string -> ?std:bool -> string -> t Seq.t -> unit
val seq_to_buffer : ?suf:string -> ?std:bool -> Buffer.t -> t Seq.t -> unit
val write_t : Buffer.t -> t -> unit
val sort : t -> t
val write_null : Buffer.t -> unit -> unit
val write_bool : Buffer.t -> bool -> unit
val write_int : Buffer.t -> int -> unit
val write_float : Buffer.t -> float -> unit
val write_std_float : Buffer.t -> float -> unit
val write_float_prec : int -> Buffer.t -> float -> unit
val write_std_float_prec : int -> Buffer.t -> float -> unit
val write_string : Buffer.t -> string -> unit
val write_intlit : Buffer.t -> string -> unit
val write_assoc : Buffer.t -> (string * t) list -> unit
val write_list : Buffer.t -> t list -> unit
val write_tuple : Buffer.t -> t list -> unit
val write_std_tuple : Buffer.t -> t list -> unit
val write_variant : Buffer.t -> string -> t option -> unit
val write_std_variant : Buffer.t -> string -> t option -> unit
val write_json : Buffer.t -> t -> unit
val write_std_json : Buffer.t -> t -> unit
val pretty_print : ?std:bool -> Format.formatter -> t -> unit
val pretty_to_string : ?std:bool -> t -> string
val pretty_to_channel : ?std:bool -> out_channel -> t -> unit
val prettify : ?std:bool -> string -> string
val compact : ?std:bool -> string -> string
exception Finally of exn * exn
val from_string : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> string -> t
val from_channel : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> in_channel -> t
val from_file : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> string -> t
type lexer_state = {
  1. buf : Buffer.t;
  2. mutable lnum : int;
  3. mutable bol : int;
  4. mutable fname : string option;
}
val init_lexer : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> unit -> lexer_state
val from_lexbuf : lexer_state -> ?stream:bool -> Lexing.lexbuf -> t
val seq_from_string : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> string -> t Seq.t
val seq_from_channel : ?buf:Buffer.t -> ?fin:(unit -> unit) -> ?fname:string -> ?lnum:int -> in_channel -> t Seq.t
val seq_from_file : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> string -> t Seq.t
val seq_from_lexbuf : lexer_state -> ?fin:(unit -> unit) -> Lexing.lexbuf -> t Seq.t
type json_line = [
  1. | `Exn of exn
  2. | `Json of t
]
val lineseq_from_channel : ?buf:Buffer.t -> ?fin:(unit -> unit) -> ?fname:string -> ?lnum:int -> in_channel -> json_line Seq.t
val lineseq_from_file : ?buf:Buffer.t -> ?fname:string -> ?lnum:int -> string -> json_line Seq.t
val read_t : lexer_state -> Lexing.lexbuf -> t
val finish_string : lexer_state -> Lexing.lexbuf -> string
val read_string : lexer_state -> Lexing.lexbuf -> string
val read_ident : lexer_state -> Lexing.lexbuf -> string
val map_string : lexer_state -> (string -> int -> int -> 'a) -> Lexing.lexbuf -> 'a
val map_ident : lexer_state -> (string -> int -> int -> 'a) -> Lexing.lexbuf -> 'a
type variant_kind = [
  1. | `Double_quote
  2. | `Edgy_bracket
  3. | `Square_bracket
]
val start_any_variant : lexer_state -> Lexing.lexbuf -> variant_kind
val finish_variant : lexer_state -> Lexing.lexbuf -> t option
val finish_skip_variant : lexer_state -> Lexing.lexbuf -> unit
val read_lt : lexer_state -> Lexing.lexbuf -> unit
val read_gt : lexer_state -> Lexing.lexbuf -> unit
val read_comma : lexer_state -> Lexing.lexbuf -> unit
val finish_stringlit : lexer_state -> Lexing.lexbuf -> string
val finish_skip_stringlit : lexer_state -> Lexing.lexbuf -> unit
val finish_escaped_char : lexer_state -> Lexing.lexbuf -> unit
val finish_comment : lexer_state -> Lexing.lexbuf -> unit
val read_space : lexer_state -> Lexing.lexbuf -> unit
val read_eof : Lexing.lexbuf -> bool
val read_null : lexer_state -> Lexing.lexbuf -> unit
val read_null_if_possible : lexer_state -> Lexing.lexbuf -> bool
val read_bool : lexer_state -> Lexing.lexbuf -> bool
val read_int : lexer_state -> Lexing.lexbuf -> int
val read_int8 : lexer_state -> Lexing.lexbuf -> char
val read_int32 : lexer_state -> Lexing.lexbuf -> int32
val read_int64 : lexer_state -> Lexing.lexbuf -> int64
val read_number : lexer_state -> Lexing.lexbuf -> float
val skip_ident : lexer_state -> Lexing.lexbuf -> unit
val read_sequence : ('a -> lexer_state -> Lexing.lexbuf -> 'a) -> 'a -> lexer_state -> Lexing.lexbuf -> 'a
val read_list : (lexer_state -> Lexing.lexbuf -> 'a) -> lexer_state -> Lexing.lexbuf -> 'a list
val read_list_rev : (lexer_state -> Lexing.lexbuf -> 'a) -> lexer_state -> Lexing.lexbuf -> 'a list
val read_array_end : Lexing.lexbuf -> unit
val read_array_sep : lexer_state -> Lexing.lexbuf -> unit
val read_array : (lexer_state -> Lexing.lexbuf -> 'a) -> lexer_state -> Lexing.lexbuf -> 'a array
val read_tuple : (int -> 'a -> lexer_state -> Lexing.lexbuf -> 'a) -> 'a -> lexer_state -> Lexing.lexbuf -> 'a
val start_any_tuple : lexer_state -> Lexing.lexbuf -> bool
val read_lpar : lexer_state -> Lexing.lexbuf -> unit
val read_rpar : lexer_state -> Lexing.lexbuf -> unit
val read_tuple_end : Lexing.lexbuf -> unit
val read_tuple_end2 : lexer_state -> bool -> Lexing.lexbuf -> unit
val read_tuple_sep : lexer_state -> Lexing.lexbuf -> unit
val read_tuple_sep2 : lexer_state -> bool -> Lexing.lexbuf -> unit
val read_lbr : lexer_state -> Lexing.lexbuf -> unit
val read_rbr : lexer_state -> Lexing.lexbuf -> unit
val read_fields : ('acc -> string -> lexer_state -> Lexing.lexbuf -> 'acc) -> 'acc -> lexer_state -> Lexing.lexbuf -> 'acc
val read_abstract_fields : (lexer_state -> Lexing.lexbuf -> 'key) -> ('acc -> 'key -> lexer_state -> Lexing.lexbuf -> 'acc) -> 'acc -> lexer_state -> Lexing.lexbuf -> 'acc
val read_lcurl : lexer_state -> Lexing.lexbuf -> unit
val read_object_end : Lexing.lexbuf -> unit
val read_object_sep : lexer_state -> Lexing.lexbuf -> unit
val read_colon : lexer_state -> Lexing.lexbuf -> unit
val read_json : lexer_state -> Lexing.lexbuf -> t
val skip_json : lexer_state -> Lexing.lexbuf -> unit
val buffer_json : lexer_state -> Lexing.lexbuf -> unit
module Util : sig ... end