package websocketaf

  1. Overview
  2. Docs
type standard = [
  1. | `Normal_closure
  2. | `Going_away
  3. | `Protocol_error
  4. | `Unsupported_data
  5. | `No_status_rcvd
  6. | `Abnormal_closure
  7. | `Invalid_frame_payload_data
  8. | `Policy_violation
  9. | `Message_too_big
  10. | `Mandatory_ext
  11. | `Internal_server_error
  12. | `TLS_handshake
]
type t = [
  1. | standard
  2. | `Other of int
]
val code : t -> int
val of_code : int -> t option
val of_code_exn : int -> t
val to_int : t -> int
val of_int : int -> t option
val of_int_exn : int -> t