Httpaf_caged.Statustype client_error = [ | `Bad_request| `Conflict| `Enhance_your_calm| `Expectation_failed| `Forbidden| `Gone| `I_m_a_teapot| `Length_required| `Method_not_allowed| `Not_acceptable| `Not_found| `Payload_too_large| `Payment_required| `Precondition_failed| `Proxy_authentication_required| `Range_not_satisfiable| `Request_timeout| `Unsupported_media_type| `Upgrade_required| `Uri_too_long ]type standard = [ | `Accepted| `Bad_gateway| `Bad_request| `Conflict| `Continue| `Created| `Enhance_your_calm| `Expectation_failed| `Forbidden| `Found| `Gateway_timeout| `Gone| `Http_version_not_supported| `I_m_a_teapot| `Internal_server_error| `Length_required| `Method_not_allowed| `Moved_permanently| `Multiple_choices| `No_content| `Not_acceptable| `Not_found| `Not_implemented| `Not_modified| `OK| `Partial_content| `Payload_too_large| `Payment_required| `Precondition_failed| `Proxy_authentication_required| `Range_not_satisfiable| `Request_timeout| `Reset_content| `See_other| `Switching_protocols| `Temporary_redirect| `Unsupported_media_type| `Upgrade_required| `Uri_too_long| `Use_proxy ]type t = [ | `Accepted| `Bad_gateway| `Bad_request| `Code of int| `Conflict| `Continue| `Created| `Enhance_your_calm| `Expectation_failed| `Forbidden| `Found| `Gateway_timeout| `Gone| `Http_version_not_supported| `I_m_a_teapot| `Internal_server_error| `Length_required| `Method_not_allowed| `Moved_permanently| `Multiple_choices| `No_content| `Not_acceptable| `Not_found| `Not_implemented| `Not_modified| `OK| `Partial_content| `Payload_too_large| `Payment_required| `Precondition_failed| `Proxy_authentication_required| `Range_not_satisfiable| `Request_timeout| `Reset_content| `See_other| `Switching_protocols| `Temporary_redirect| `Unsupported_media_type| `Upgrade_required| `Uri_too_long| `Use_proxy ]val default_reason_phrase : standard -> stringval to_code : t -> intval of_code : int -> tval unsafe_of_code : int -> tval is_informational : t -> boolval is_successful : t -> boolval is_redirection : t -> boolval is_client_error : t -> boolval is_server_error : t -> boolval is_error : t -> boolval to_string : t -> stringval of_string : string -> tval pp_hum : Format.formatter -> t -> unit