package ojs-base

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type app_server_msg = ..
type app_client_msg = ..
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
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
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