Workaround or fix
This commit is contained in:
parent
ad5ae04a43
commit
c4db4c8d6d
1
TODO
1
TODO
|
@ -2,3 +2,4 @@ Running the server and test3_latency, and then starting and
|
||||||
interrupting test1_latency repeatedly, the server eventually corrupts
|
interrupting test1_latency repeatedly, the server eventually corrupts
|
||||||
itself and will no longer let test1_latency bind and receive
|
itself and will no longer let test1_latency bind and receive
|
||||||
messages. Sometimes test3_latency stops too.
|
messages. Sometimes test3_latency stops too.
|
||||||
|
[TENTATIVE FIX: see try/with in write_sexp in relay.ml]
|
||||||
|
|
2
relay.ml
2
relay.ml
|
@ -61,7 +61,7 @@ let relay_main peername cin cout =
|
||||||
let mtx = Mutex.create () in
|
let mtx = Mutex.create () in
|
||||||
let write_sexp s =
|
let write_sexp s =
|
||||||
Mutex.lock mtx;
|
Mutex.lock mtx;
|
||||||
output_sexp cout s;
|
(try output_sexp cout s with Sys_error _ -> ()); (* TODO: try removing this *)
|
||||||
Mutex.unlock mtx
|
Mutex.unlock mtx
|
||||||
in
|
in
|
||||||
let flush_control = Event.new_channel () in
|
let flush_control = Event.new_channel () in
|
||||||
|
|
Loading…
Reference in New Issue