summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lib/stream.ml6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/stream.ml b/lib/stream.ml
index 6e4829b..141e2a5 100644
--- a/lib/stream.ml
+++ b/lib/stream.ml
@@ -12,6 +12,12 @@ let parse_auth_mechanism = function
| "PLAIN" -> PLAIN
| other -> Unknown other
+type stream_features = {
+ sasl_mechanisms : auth_mechanism list;
+ starttls : [`Required | `Optional | `None];
+ unknown_features : Xml.element list;
+ }
+
let get (stream : (signal, async) stream) : (signal, sync) stream Lwt.t =
(** [stanza stream] is a promise containing a full stanza of the fragments of
[stream]. *)