Json_parsing (integration_test_lib.Integration_test_lib.Json

type 'a parser = Yojson.Safe.t -> 'a

val json : Yojson.Safe.t parser

val bool : bool parser

val string : string parser

val int : int parser

val float : float parser

val list : 'a parser -> 'a list parser

val state_hash : Mina_base.State_hash.t parser

val parse : 'a parser -> Yojson.Safe.t -> 'a0 Core_kernel.Or_error.t

val parser_from_of_yojson : 
  ( Yojson.Safe.t -> ( 'a, string ) Core_kernel._result ) ->
  Yojson.Safe.t ->
  'b

val valid_commands_with_statuses : 
  Mina_base.User_command.Valid.t Mina_base.With_status.t list parser

val find : 
  'a parser ->
  Yojson.Safe.t ->
  string list ->
  'a0 Core_kernel.Or_error.t