package ez_api

  1. Overview
  2. Docs
module IntMap : sig ... end
type _ case =
  1. | Case : {
    1. code : int;
    2. name : string;
    3. encoding : 'a Json_encoding.encoding;
    4. select : 'b -> 'a option;
    5. deselect : 'a -> 'b;
    } -> 'b case
val make : code:int -> name:string -> encoding:'a Json_encoding.encoding -> select:('b -> 'a option) -> deselect:('a -> 'b) -> 'b case
val merge_errs_same_code : ?definitions_path:string -> 'a case list -> (IntMap.key * Json_schema.schema lazy_t) list
val catch_all_error_case : unit -> 'a case
val get : code:int -> 'a case list -> 'a Json_encoding.encoding option
OCaml

Innovation. Community. Security.