Ignore SIGPIPE
This commit is contained in:
parent
7dff60b8a3
commit
cecd0486eb
|
@ -17,6 +17,7 @@ let start_net port_number =
|
||||||
|
|
||||||
let _ =
|
let _ =
|
||||||
printf "ocamlmsg ALPHA, Copyright (C) 2012 Tony Garnock-Jones. All rights reserved.\n%!";
|
printf "ocamlmsg ALPHA, Copyright (C) 2012 Tony Garnock-Jones. All rights reserved.\n%!";
|
||||||
|
Sys.set_signal Sys.sigpipe Sys.Signal_ignore;
|
||||||
Uuid.init ();
|
Uuid.init ();
|
||||||
Factory.init ();
|
Factory.init ();
|
||||||
Queuenode.init ();
|
Queuenode.init ();
|
||||||
|
|
Loading…
Reference in New Issue