sig
  type t
  val make :
    ?max_age:int ->
    ?domain:string ->
    ?path:string ->
    ?secure:bool ->
    ?comment:string ->
    ?comment_url:string ->
    ?ports:int list -> string -> string -> Netcgi_common.Cookie.t
  val name : Netcgi_common.Cookie.t -> string
  val value : Netcgi_common.Cookie.t -> string
  val max_age : Netcgi_common.Cookie.t -> int option
  val domain : Netcgi_common.Cookie.t -> string option
  val path : Netcgi_common.Cookie.t -> string option
  val secure : Netcgi_common.Cookie.t -> bool
  val comment : Netcgi_common.Cookie.t -> string
  val comment_url : Netcgi_common.Cookie.t -> string
  val ports : Netcgi_common.Cookie.t -> int list option
  val set_value : Netcgi_common.Cookie.t -> string -> unit
  val set_max_age : Netcgi_common.Cookie.t -> int option -> unit
  val set_domain : Netcgi_common.Cookie.t -> string option -> unit
  val set_path : Netcgi_common.Cookie.t -> string option -> unit
  val set_secure : Netcgi_common.Cookie.t -> bool -> unit
  val set_comment : Netcgi_common.Cookie.t -> string -> unit
  val set_comment_url : Netcgi_common.Cookie.t -> string -> unit
  val set_ports : Netcgi_common.Cookie.t -> int list option -> unit
  val set : #Netmime.mime_header -> Netcgi_common.Cookie.t list -> unit
  val get : #Netmime.mime_header -> Netcgi_common.Cookie.t list
  val of_record : Nethttp.cookie -> Netcgi_common.Cookie.t
  val to_record : Netcgi_common.Cookie.t -> Nethttp.cookie
end