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

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

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

revision 1.14 by spiralvoice, Wed Jul 27 22:16:02 2005 UTC revision 1.15 by spiralvoice, Sun Aug 7 12:57:22 2005 UTC
# Line 102  let find_proto (name : string) = Line 102  let find_proto (name : string) =
102  let min_range_size = megabyte  let min_range_size = megabyte
103    
104  let set_file_size file size =  let set_file_size file size =
105    lprintf "set_file_size\n";    lprintf "set_file_size %s : %s\n" (Unix32.filename (file_fd file)) (Int64.to_string size);
106    if file_size file = zero && size <> zero then begin    if file_size file = zero && size <> zero then begin
107        lprintf "Setting SWARMER\n";        lprintf "Setting SWARMER\n";
108        let file_chunk_size =        let file_chunk_size =

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

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