From 0ad8bde6d1d7fb2f5c2fa798a225796c227a14df Mon Sep 17 00:00:00 2001 From: Lesenechal Remi Date: Fri, 17 Jan 2020 16:29:23 +0100 Subject: [PATCH] add missing newlines --- src/bin/cli_helpers.ml | 2 +- src/main/display.ml | 8 ++++---- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/src/bin/cli_helpers.ml b/src/bin/cli_helpers.ml index fdd9826c9..7d0cf9eb5 100644 --- a/src/bin/cli_helpers.ml +++ b/src/bin/cli_helpers.ml @@ -8,7 +8,7 @@ let error_suggest: string = "\n If you're not sure how to fix this error, you ca * Visit our documentation: https://ligolang.org/docs/intro/what-and-why/ * Ask a question on our Discord: https://discord.gg/9rhYaEt * Open a gitlab issue: https://gitlab.com/ligolang/ligo/issues/new -* Check the changelog by running 'ligo changelog'" +* Check the changelog by running 'ligo changelog'\n" let toplevel ~(display_format : display_format) (x : string result) : unit Term.ret = match x with diff --git a/src/main/display.ml b/src/main/display.ml index 9bea4ca56..ee9356b79 100644 --- a/src/main/display.ml +++ b/src/main/display.ml @@ -57,14 +57,14 @@ let result_pp_hr f out (r : _ result) = | Ok (s , _) -> Format.fprintf out "%a" f s | Error e -> Format.fprintf out "%a" (error_pp ~dev:false) (e ()) -let string_result_pp_hr = result_pp_hr (fun out s -> Format.fprintf out "%s" s) +let string_result_pp_hr = result_pp_hr (fun out s -> Format.fprintf out "%s\n" s) let result_pp_dev f out (r : _ result) = match r with | Ok (s , _) -> Format.fprintf out "%a" f s | Error e -> Format.fprintf out "%a" (error_pp ~dev:true) (e ()) -let string_result_pp_dev = result_pp_hr (fun out s -> Format.fprintf out "%s" s) +let string_result_pp_dev = result_pp_hr (fun out s -> Format.fprintf out "%s\n" s) let json_pp out x = Format.fprintf out "%s" (J.to_string x) @@ -75,10 +75,10 @@ let string_result_pp_json out (r : string result) = ]) in match r with | Ok (x , _) -> ( - Format.fprintf out "%a" json_pp (status_json "ok" (`String x)) + Format.fprintf out "%a\n" json_pp (status_json "ok" (`String x)) ) | Error e -> ( - Format.fprintf out "%a" json_pp (status_json "error" (e ())) + Format.fprintf out "%a\n" json_pp (status_json "error" (e ())) ) type display_format = [