Add indentation to pp_equations in src/ast_to_c.ml

2022-12-10 19:27:18 +01:00 · 2022-12-10 19:27:18 +01:00 · 5a54f897b1
commit 5a54f897b1
parent ac1eea42e9
1 changed files with 1 additions and 1 deletions
--- a/src/ast_to_c.ml
+++ b/src/ast_to_c.ml
@ -157,7 +157,7 @@ let pp_expression =
 let rec pp_equations fmt: t_eqlist -> unit = function
  | [] -> ()
  | (patt, expr) :: eqs ->
-      Format.fprintf fmt "%a = %a;\n%a"
+      Format.fprintf fmt "\t%a = %a;\n%a"
        pp_varlist patt
        pp_expression expr
        pp_equations eqs