/[mldonkey]/mldonkey/src/networks/donkey/donkeyOneFile.ml
ViewVC logotype

Diff of /mldonkey/src/networks/donkey/donkeyOneFile.ml

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

revision 1.25 by spiralvoice, Mon Aug 15 20:27:56 2005 UTC revision 1.26 by spiralvoice, Thu Aug 18 13:00:03 2005 UTC
# Line 416  let block_received c md4 begin_pos bloc Line 416  let block_received c md4 begin_pos bloc
416    match c.client_download with    match c.client_download with
417      None ->      None ->
418        if !verbose_hidden_errors then        if !verbose_hidden_errors then
419          lprintf_nl ()"block_received: block received but no file !\n  Received: %s" (Md4.to_string md4)          lprintf_nl ()"block_received: block received but no file !, received: %s" (Md4.to_string md4)
420    | Some (file, up) ->    | Some (file, up) ->
421                
422        if file.file_md4 <> md4 then begin        if file.file_md4 <> md4 then begin
423            if !verbose_hidden_errors then            if !verbose_hidden_errors then
424              lprintf_nl () "block_received: block for bad file\n  Received: %s\n  Expected: %s" (Md4.to_string md4) (Md4.to_string file.file_md4)              lprintf_nl () "block_received: block for bad file, received: %s, expected: %s" (Md4.to_string md4) (Md4.to_string file.file_md4)
425          end else begin          end else begin
426            DonkeySources.set_request_result c.client_source file.file_sources File_upload;            DonkeySources.set_request_result c.client_source file.file_sources File_upload;
427                        

Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26

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