diff options
Diffstat (limited to 'portal/tcp/portal.ml')
| -rw-r--r-- | portal/tcp/portal.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/portal/tcp/portal.ml b/portal/tcp/portal.ml index c7afd8e..f1eaff9 100644 --- a/portal/tcp/portal.ml +++ b/portal/tcp/portal.ml @@ -6,9 +6,9 @@ open Markup type socket = file_descr type t = { - stream : (signal, async) stream; - push : (signal, sync) stream option -> unit; - _socket : socket; + mutable stream : (signal, async) stream; + mutable push : (signal, sync) stream option -> unit; + mutable _socket : socket; } let xmlns = "http://etherx.jabber.org/streams" |