diff --git a/bin/lustre-mt/main.ml b/bin/lustre-mt/main.ml index 72a504ba5c40e4cdb910a5fac8a5d35f11e85de7..5dc0d8f39072984f8dbb9f82c2b13d717b093caa 100644 --- a/bin/lustre-mt/main.ml +++ b/bin/lustre-mt/main.ml @@ -131,7 +131,7 @@ let main () = in List.iter print_task_inputs !tasks; - fprintf cfile "/* task inputs */\n"; + fprintf cfile "/* task outputs */\n"; let print_task_outputs task = let (print_var_outputs : string -> variable -> unit) = fun name var ->