X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/456ab1eb0f387a99d0bfdc5bb3c42c20d645b331..adf24ec25c76cc5eaa5aa319eaa2df1405312f9e:/interpreter/main.ml?ds=inline 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