From ad1f5298639ebc78d956b3774d46ad44c7af6495 Mon Sep 17 00:00:00 2001 From: Arnaud DABY-SEESARAM Date: Tue, 13 Dec 2022 14:57:55 +0100 Subject: [PATCH] [typo] adding newline --- src/main.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/main.ml b/src/main.ml index 4e87279..d8b5089 100644 --- a/src/main.ml +++ b/src/main.ml @@ -91,9 +91,9 @@ let _ = let passes = List.map (fun (pass: string) -> (pass, match Hashtbl.find_opt passes_table pass with | None -> - (exit_error (Format.sprintf "The pass %s does not exist." pass); exit 0) + (exit_error (Format.sprintf "The pass %s does not exist.\n" pass); exit 0) | Some f -> - (print_debug ("The pass "^pass^" has been selected."); f))) !passes in + (print_debug ("The pass "^pass^" has been selected.\n"); f))) !passes in print_debug (Format.asprintf "Initial AST (before executing any passes):\n%a" Pp.pp_ast ast) ;