浏览代码

[cs] add newline after each case value

Dan Korostelev 11 年之前
父节点
当前提交
70eac96b67
共有 1 个文件被更改,包括 1 次插入1 次删除
  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;