Commits

Sebastien Mondet  committed 4a86e7c

Do minor printf changes

  • Participants
  • Parent commits 5fdd795

Comments (0)

Files changed (1)

File fastqbench.ml

     ) buffer_sizes
     >>= fun lwt_io_results ->
     Lwt_list.iter_s (fun (bufs, reads, time) ->
-      Lwt_io.printf "{c|%s} {c|%d} {c|%f (%f)}\n"
+      Lwt_io.printf "{c|%s} {c|%d} {c|%f (%f)}\n%!"
         (name bufs) reads time (time /. float repetitions))
       lwt_io_results
   in
     let start = Time.now () in
     iteration repetitions >>= fun () ->
     let time = Time.(diff (now ()) start) |! Core.Span.to_float in
-    Lwt_io.printf "{c|%s} {c|%d} {c|%f (%f)}\n"
+    Lwt_io.printf "{c|%s} {c|%d} {c|%f (%f)}\n%!"
       name !reads time (time /. float repetitions)
   in
   let non_lwt_trim_bench file f name =
     let start = Time.now () in
     iteration repetitions >>= fun () ->
     let time = Time.(diff (now ()) start) |! Core.Span.to_float in
-    Lwt_io.printf "{c|%s} {c|%f (%f)}\n"
+    Lwt_io.printf "{c|%s} {c|%f (%f)}\n%!"
       name time (time /. float repetitions)
   in
   let lwt_trim_bench file f name =
     ) buffer_sizes
     >>= fun lwt_io_results ->
     Lwt_list.iter_s (fun (inbufs, outbufs, time) ->
-      Lwt_io.printf "{c|%s} {c|%f (%f)}\n"
+      Lwt_io.printf "{c|%s} {c|%f (%f)}\n%!"
         (name inbufs outbufs) time (time /. float repetitions))
       (List.concat lwt_io_results)
   in