Give an indication of how many packages we have compiled/how many to go.

[goaljobs-goals.git] / fedora_ocaml_rebuild.ml

diff --git a/fedora_ocaml_rebuild.ml b/fedora_ocaml_rebuild.ml
index e6d3e73..9cf135f 100644 (file)
--- a/fedora_ocaml_rebuild.ml
+++ b/fedora_ocaml_rebuild.ml
@@ -31,6 +31,7 @@ let blocked = [
   "ocaml-preludeml";                    (* build failure *)
   "cduce";                              (* broken again with latest 4.02 *)
   "frama-c";                            (* build failure *)
+  "gappalib-coq";                       (* build failure in configure script *)
 ]
 let blocked pkg = List.mem pkg blocked
 
@@ -109,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 =