[Mldonkey-commits] mldonkey distrib/ChangeLog src/daemon/common/co...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Branch:         
Changes by:     spiralvoice <address@hidden>    06/05/14 18:54:17

Modified files:
        distrib        : ChangeLog 
        src/daemon/common: commonSwarming.ml 

Log message:
        patch #5093

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/distrib/ChangeLog.diff?tr1=1.824&tr2=1.825&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/src/daemon/common/commonSwarming.ml.diff?tr1=1.31&tr2=1.32&r1=text&r2=text

Patches:
Index: mldonkey/distrib/ChangeLog
diff -u mldonkey/distrib/ChangeLog:1.824 mldonkey/distrib/ChangeLog:1.825
--- mldonkey/distrib/ChangeLog:1.824    Sun May 14 18:53:25 2006
+++ mldonkey/distrib/ChangeLog  Sun May 14 18:54:17 2006
@@ -15,6 +15,7 @@
 =========
 
 2006/05/14
+5093: CommonSwarming: Verbose error message if file size does not match
 5092: HTML, rss: Add startbt link
 5091: HTML: update EDK history links
 
Index: mldonkey/src/daemon/common/commonSwarming.ml
diff -u mldonkey/src/daemon/common/commonSwarming.ml:1.31 
mldonkey/src/daemon/common/commonSwarming.ml:1.32
--- mldonkey/src/daemon/common/commonSwarming.ml:1.31   Mon Apr 10 17:06:43 2006
+++ mldonkey/src/daemon/common/commonSwarming.ml        Sun May 14 18:54:17 2006
@@ -591,7 +591,11 @@
   let size = file_size t.t_file in
 
 (* what about raising an exception instead ? *)
-  assert (s.s_size = size);
+  if s.s_size <> size then
+    begin
+      lprintf_nl () "file_size for %s does not match: swarmer %Ld / real %Ld" 
s.s_filename s.s_size size;
+      exit 2
+    end;
 
   (* shouldn't just [t] be removed from the list ? *)
   (* t.t_s.s_networks <- []; *)