Flush stdout added in proper position.

diff --git a/components/binaries/utilities/test_library.ml b/components/binaries/utilities/test_library.ml
index 8abf5e9beaa28afa15d59c6624afd8a1b520d749..f0e9510db2074b4dafddb1129f1261730e7b3355 100644 (file)
--- a/components/binaries/utilities/test_library.ml
+++ b/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);