[Mldonkey-commits] Changes to mldonkey/src/utils/lib/fifo.ml

[mldonkey-commits]

Index: mldonkey/src/utils/lib/fifo.ml
diff -u mldonkey/src/utils/lib/fifo.ml:1.4 mldonkey/src/utils/lib/fifo.ml:1.5
--- mldonkey/src/utils/lib/fifo.ml:1.4  Tue Aug  9 10:50:02 2005
+++ mldonkey/src/utils/lib/fifo.ml      Sat Nov 19 17:19:45 2005
@@ -243,7 +243,7 @@
   if not t.empty then begin
       if t.outpos >= t.inpos then reformat t;
       let rec iter t i j =
-(*        Printf.printf "i=%d j=%d inpos=%d outpos=%d\n"
+(*        Printf2.lprintf "i=%d j=%d inpos=%d outpos=%d\n"
           i j t.inpos t.outpos; print_newline (); *)
         if i >= t.inpos then
           (if i > j then begin
@@ -256,7 +256,7 @@
           iter t (i+1) j
         else begin
             if i > j then begin
-(*                Printf.printf "Move i=%d at j=%d" i j; print_newline ();  *)
+(*                Printf2.lprintf "Move i=%d at j=%d" i j; print_newline ();  
*)
                 t.array.(j) <- ee;
               end;
             iter t (i+1) (j+1)
@@ -285,7 +285,7 @@
 ;;
 
 while true do
-  Printf.printf "%d\n" (Fifo.take t)
+  Printf2.lprintf "%d\n" (Fifo.take t)
 done;;
 
 *)