From c4e0993e81c4bd3d1aadae4baa8d10ada8f06d76 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Sat, 2 Aug 2014 17:03:25 +0100 Subject: [PATCH] Give an indication of how many packages we have compiled/how many to go. --- fedora_ocaml_rebuild.ml | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/fedora_ocaml_rebuild.ml b/fedora_ocaml_rebuild.ml index 15fda83..9cf135f 100644 --- a/fedora_ocaml_rebuild.ml +++ b/fedora_ocaml_rebuild.ml @@ -110,7 +110,12 @@ let () = Unix.putenv "MAKEFLAGS" "" (* Goal: rebuild all packages. *) let rec goal all () = - List.iter (fun pkg -> require (rebuild_started pkg)) source_packages + let n = List.length source_packages in + List.iteri ( + fun i pkg -> + require (rebuild_started pkg); + printf "*** *** rebuilt %d/%d packages *** ***\n%!" (i+1) n + ) source_packages (* Goal: That 'package' has been rebuilt and exists in Koji. *) and rebuilt pkg = -- 1.8.3.1