- merged "post" branch

[helm.git] / helm / DEVEL / ocaml-http / http_response.mli

diff --git a/helm/DEVEL/ocaml-http/http_response.mli b/helm/DEVEL/ocaml-http/http_response.mli
index c7073da26a10c21f7eb63c57e6c74a51f3966717..78ef0fa4265ad9187e33951ba4dd576b3b7c7255 100644 (file)
--- a/helm/DEVEL/ocaml-http/http_response.mli
+++ b/helm/DEVEL/ocaml-http/http_response.mli
@@ -19,5 +19,12 @@
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *)
 
-class response: Http_types.response
+open Http_types;;
+
+class response:
+  ?body:string -> ?headers:(string * string) list -> ?version: version ->
+  ?clisockaddr: Unix.sockaddr -> ?srvsockaddr: Unix.sockaddr ->
+  ?code:int -> ?status:Http_types.status ->
+  unit ->
+    Http_types.response