Compiler: pretty-print, tune

ocsigen · Feb 10, 2023 · 344e423 · 344e423
1 parent d4a3837
commit 344e423
Show file tree

Hide file tree

Showing 7 changed files with 554 additions and 561 deletions.
diff --git a/compiler/lib/js_output.ml b/compiler/lib/js_output.ml
@@ -1132,7 +1132,7 @@ struct
         in
         ite "if" e s1 s2
     | While_statement (e, s) ->
-        PP.start_group f 1;
+        PP.start_group f 0;
         PP.start_group f 0;
         PP.string f "while";
         PP.break f;
@@ -1159,7 +1159,7 @@ struct
         PP.end_group f;
         PP.end_group f
     | For_statement (e1, e2, e3, s) ->
-        PP.start_group f 1;
+        PP.start_group f 0;
         PP.start_group f 0;
         PP.string f "for";
         PP.break f;
@@ -1189,7 +1189,7 @@ struct
         statement1 ~last f s;
         PP.end_group f
     | ForIn_statement (e1, e2, s) ->
-        PP.start_group f 1;
+        PP.start_group f 0;
         PP.start_group f 0;
         PP.string f "for";
         PP.break f;
@@ -1211,7 +1211,7 @@ struct
         statement1 ~last f s;
         PP.end_group f
     | ForOf_statement (e1, e2, s) ->
-        PP.start_group f 1;
+        PP.start_group f 0;
         PP.start_group f 0;
         PP.string f "for";
         PP.break f;