X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/66f23d4fabf89ad09adbd4dfc15ac6b5b2b7da83..adf24ec25c76cc5eaa5aa319eaa2df1405312f9e:/interpreter/main.ml

diff --git a/interpreter/main.ml b/interpreter/main.ml
index 21c2a8e..ff94e29 100644
--- a/interpreter/main.ml
+++ b/interpreter/main.ml
@@ -83,14 +83,14 @@ let main () =
 	let () = print_endline(" Done. (duration: " ^ (string_of_float (toc2 -. tic2)) ^ "s.)") in
 
 
-	let () = print_string("    Faustine -> Evaluating...") in
+	let () = print_string("    Faustine -> Constructing signals...") in
 	let tic3 = Sys.time () in
 	let output = proc#eval input in
 	let toc3 = Sys.time () in
 	let () = print_endline(" Done. (duration: " ^ (string_of_float (toc3 -. tic3)) ^ "s.)") in
 
 
-	let () = print_string("    Faustine -> Calculating...") in
+	let () = print_string("    Faustine -> Evaluating...") in
 	let tic4 = Sys.time () in
 	let data = output#output !time_max in
 	let rates = output#frequency in