package owebl

  1. Overview
  2. Docs
type r = Response.r =
  1. | Empty
  2. | ValidResponse of string
type t = < get_response : Request.t -> r >
val http_response : string -> string -> string -> string -> string list -> r
class virtual response : object ... end
type f =
  1. | NoStaticFile
  2. | StaticFile of string
type d =
  1. | DefaultTemplateDir
  2. | TemplateDir of string
val default_template_dir : string
class file_response : d -> f -> object ... end
val create : ?template_dir:d -> ?static_file:f -> unit -> file_response