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

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

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

revision 1.17 by spiralvoice, Tue Aug 9 10:48:38 2005 UTC revision 1.18 by spiralvoice, Tue Sep 6 11:25:00 2005 UTC
# Line 451  let use_remaining_bytes bc n = Line 451  let use_remaining_bytes bc n =
451  let set_socks_proxy t ss =  let set_socks_proxy t ss =
452    try    try
453    
454      Buffer.clear buf;      Buffer.reset buf;
455      let s = read_buf in      let s = read_buf in
456    
457      t.socks_proxy <- Some ss;      t.socks_proxy <- Some ss;
# Line 468  let set_socks_proxy t ss = Line 468  let set_socks_proxy t ss =
468    
469      let send_and_wait () =      let send_and_wait () =
470        let s = Buffer.contents buf in        let s = Buffer.contents buf in
471        Buffer.clear buf;        Buffer.reset buf;
472        assert (local_sendto fd s 0 (String.length s) [] proxy_addr > 0);        assert (local_sendto fd s 0 (String.length s) [] proxy_addr > 0);
473                
474        match Unix.select [fd] [] [] 30. with        match Unix.select [fd] [] [] 30. with

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

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