/[mldonkey]/mldonkey/src/utils/net/tcpClientSocket.ml
ViewVC logotype

Diff of /mldonkey/src/utils/net/tcpClientSocket.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by spiralvoice, Sat Dec 3 16:20:26 2005 UTC revision 1.12 by spiralvoice, Tue Dec 6 20:26:40 2005 UTC
# Line 535  let dump_socket t buf = Line 535  let dump_socket t buf =
535        
536  let create name fd handler =  let create name fd handler =
537    if !debug then begin    if !debug then begin
538        lprintf "[fd %d %s]\n" (Obj.magic fd) name;        lprintf_nl "[fd %d %s]\n" (Obj.magic fd) name;
539      end;      end;
540    MlUnix.set_close_on_exec fd;    MlUnix.set_close_on_exec fd;
541    let t = {    let t = {

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26