Browse Source

[cs] add newline after each case value

Dan Korostelev 11 năm trước cách đây
mục cha
commit
70eac96b67
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      gencs.ml

+ 1 - 1
gencs.ml

@@ -1433,8 +1433,8 @@ let configure gen =
 							in_value := true;
 							expr_s w e;
 							write w ":";
+							newline w;
 						) el;
-						newline w;
 						in_value := false;
 						expr_s w (mk_block e);
 						newline w;