/[mldonkey]/mldonkey/src/networks/fileTP/fileTPHTTP.ml
ViewVC logotype

Diff of /mldonkey/src/networks/fileTP/fileTPHTTP.ml

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

revision 1.15 by spiralvoice, Sun Oct 16 20:42:54 2005 UTC revision 1.16 by spiralvoice, Sun Dec 4 15:22:43 2005 UTC
# Line 280  let rec client_parse_header c gconn sock Line 280  let rec client_parse_header c gconn sock
280            end;            end;
281    
282          let b = TcpBufferedSocket.buf sock in          let b = TcpBufferedSocket.buf sock in
283          let to_read = (*min (end_pos -- !counter_pos) *)          let to_read = min (end_pos -- !counter_pos)
284            (Int64.of_int b.len) in            (Int64.of_int b.len) in
285    
286          if !verbose then lprintf_nl () "Reading: end_pos %Ld counter_pos %Ld len %d = to_read %Ld"          if !verbose then lprintf_nl () "Reading: end_pos %Ld counter_pos %Ld len %d = to_read %Ld"

Legend:
Removed from v.1.15  
changed lines
  Added in v.1.16

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