summaryrefslogtreecommitdiff
path: root/gemini/request.mli
diff options
context:
space:
mode:
Diffstat (limited to 'gemini/request.mli')
-rw-r--r--gemini/request.mli6
1 files changed, 5 insertions, 1 deletions
diff --git a/gemini/request.mli b/gemini/request.mli
index b96a5ae..45049f1 100644
--- a/gemini/request.mli
+++ b/gemini/request.mli
@@ -1,5 +1,7 @@
module type GEMINI_TRANSACTION =
sig
+ type request
+
module M : MimeType.MIME_TYPE
type status =
@@ -29,9 +31,11 @@ sig
type response = status * mime_type * string
+ val string_to_request : string -> request
+
val int_to_status : int -> status option
- val request : string -> response option
+ val transaction : request -> response option Lwt.t
end
module GeminiTransaction (M : MimeType.MIME_TYPE) : GEMINI_TRANSACTION with module M = M