Wrap long line.
This commit is contained in:
parent
63f9bd7b63
commit
ec0de963e0
|
@ -821,7 +821,8 @@ let trans_crate
|
|||
|
||||
| Ast.STMT_log a ->
|
||||
begin
|
||||
match Semant.simplified_ty (Semant.atom_type sem_cx a) with
|
||||
let aty = Semant.atom_type sem_cx a in
|
||||
match Semant.simplified_ty aty with
|
||||
(* NB: If you extend this, be sure to update the
|
||||
* typechecking code in type.ml as well. *)
|
||||
Ast.TY_str -> trans_log_str a
|
||||
|
|
Loading…
Reference in New Issue