Convert (mavryk-openapi.Mavryk

val fail : ('a, unit, string, 'b) Stdlib.format4 -> 'c

val warn : ('a, unit, string, unit) Stdlib.format4 -> 'b

val opt_fold : ('a -> 'b -> 'c) -> 'd -> 'e option -> 'f

val check_array_specs : Json_schema.array_specs -> unit

val convert_enum : 
  Json_repr.any list option ->
  ([> Json_repr.ezjsonm ] -> 'a) ->
  'b list option

val convert_element : Json_schema.element -> Openapi.Schema.t

module String_map : sig ... end

type env = Openapi.Schema.t String_map.t

val empty_env : 'a String_map.t

val merge_envs : env -> env -> env

val merge_env_list : env list -> env

val gather_definitions : Json_schema.schema -> Openapi.Schema.t -> env

val convert_schema : Json.t -> env * Openapi.Schema.t

val convert_response : 
  ?code:int ->
  Api.schemas option ->
  env * Openapi.Response.t list

val opt_map_with_env : 
  ('a -> 'b String_map.t * 'c) ->
  'd option ->
  'b String_map.t * 'e option

val convert_query_parameter : 
  Api.query_parameter ->
  Openapi.Service.query_parameter

val convert_service : 
  Api.path_item list ->
  Method.t ->
  Api.service ->
  env * Openapi.Service.t

val convert_path_item : Api.path_item -> Openapi.Path.item

val convert_path : Api.path -> Openapi.Path.t

val convert_endpoint : Api.service Api.endpoint -> env * Openapi.Endpoint.t

val convert_api : 
  title:string ->
  description:string ->
  string ->
  Api.service Api.endpoint list ->
  Openapi.t