We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent bd66520 commit b4d9779Copy full SHA for b4d9779
lib/fulminate/cn_to_ail.ml
@@ -1784,7 +1784,9 @@ let rec cn_to_ail_expr_aux
1784
in
1785
let e1_transformed = transform_switch_expr e1 in
1786
let unreachable =
1787
- A.AilSexpr (mk_expr (AilEcall (mk_expr (AilEident (Sym.fresh "abort")),[]))) in
+ A.AilSexpr
1788
+ (mk_expr (AilEcall (mk_expr (AilEident (Sym.fresh "abort")), [])))
1789
+ in
1790
let ail_case_stmts =
1791
List.map build_case dt.cn_dt_cases
1792
@ [ mk_stmt (AilSdefault (mk_stmt unreachable)) ]
0 commit comments