package ojs_list

  1. Overview
  2. Docs
include Ojs_list.Types.P
include Ojs_base.Types.App_msg
type app_server_msg = ..
module M_app_server_msg_to_yojson : sig ... end
val app_server_msg_to_yojson : app_server_msg -> Yojson.Safe.t
module M_app_server_msg_of_yojson : sig ... end
val app_server_msg_of_yojson : Yojson.Safe.t -> app_server_msg Ppx_deriving_yojson_runtime.error_or
type app_client_msg = ..
module M_app_client_msg_to_yojson : sig ... end
val app_client_msg_to_yojson : app_client_msg -> Yojson.Safe.t
module M_app_client_msg_of_yojson : sig ... end
val app_client_msg_of_yojson : Yojson.Safe.t -> app_client_msg Ppx_deriving_yojson_runtime.error_or
include module type of Ojs_list.Types.Base
type 'a server_msg = ..
module M_server_msg_to_yojson : sig ... end
module M_server_msg_of_yojson : sig ... end
val server_msg_to_yojson : ('a -> Yojson.Safe.t) -> 'a server_msg -> Yojson.Safe.t
val server_msg_of_yojson : (Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or) -> Yojson.Safe.t -> 'a server_msg Ppx_deriving_yojson_runtime.error_or
type server_msg +=
  1. | SOk
  2. | SError of string
  3. | SAdd of 'a
  4. | SDelete of 'a
  5. | SList of 'a list
type 'a client_msg = ..
module M_client_msg_to_yojson : sig ... end
module M_client_msg_of_yojson : sig ... end
val client_msg_to_yojson : ('a -> Yojson.Safe.t) -> 'a client_msg -> Yojson.Safe.t
val client_msg_of_yojson : (Yojson.Safe.t -> 'a Ppx_deriving_yojson_runtime.error_or) -> Yojson.Safe.t -> 'a client_msg Ppx_deriving_yojson_runtime.error_or
type client_msg +=
  1. | Get
  2. | Add of 'a
  3. | Delete of 'a
type elt
val pack_server_msg : string -> elt server_msg -> app_server_msg
val unpack_server_msg : app_server_msg -> (string * elt server_msg) option
val pack_client_msg : string -> elt client_msg -> app_client_msg
val unpack_client_msg : app_client_msg -> (string * elt client_msg) option
val insert : Ojs_js.id -> elt -> Ojs_js.id
OCaml

Innovation. Community. Security.