`sig
type t
val make :
?max_age:int ->
?domain:string ->
?path:string ->
?secure:bool ->
?comment:string ->
?comment_url:string ->
?ports:int list -> string -> string -> Nethttp.Cookie.t
val name : Nethttp.Cookie.t -> string
val value : Nethttp.Cookie.t -> string
val domain : Nethttp.Cookie.t -> string option
val path : Nethttp.Cookie.t -> string option
val ports : Nethttp.Cookie.t -> int list option
val max_age : Nethttp.Cookie.t -> int option
val secure : Nethttp.Cookie.t -> bool
val comment : Nethttp.Cookie.t -> string
val comment_url : Nethttp.Cookie.t -> string
val set_value : Nethttp.Cookie.t -> string -> unit
val set_max_age : Nethttp.Cookie.t -> int option -> unit
val set_domain : Nethttp.Cookie.t -> string option -> unit
val set_path : Nethttp.Cookie.t -> string option -> unit
val set_secure : Nethttp.Cookie.t -> bool -> unit
val set_comment : Nethttp.Cookie.t -> string -> unit
val set_comment_url : Nethttp.Cookie.t -> string -> unit
val set_ports : Nethttp.Cookie.t -> int list option -> unit
val of_netscape_cookie : Nethttp.netscape_cookie -> Nethttp.Cookie.t
val to_netscape_cookie : Nethttp.Cookie.t -> Nethttp.netscape_cookie
end`