Flush stdout added in proper position.

[helm.git] / helm / software / components / binaries / utilities / test_library.ml

diff --git a/helm/software/components/binaries/utilities/test_library.ml b/helm/software/components/binaries/utilities/test_library.ml
index 8abf5e9beaa28afa15d59c6624afd8a1b520d749..f0e9510db2074b4dafddb1129f1261730e7b3355 100644 (file)
--- a/helm/software/components/binaries/utilities/test_library.ml
+++ b/helm/software/components/binaries/utilities/test_library.ml
@@ -69,6 +69,7 @@ let _ =
           | _ -> assert false
         in
         Printf.printf "%s " uri;
+        flush stdout;
         let uri = UriManager.uri_of_string uri in
         let before = Unix.gettimeofday () in
         ignore (CicTypeChecker.typecheck uri);