aboutsummaryrefslogtreecommitdiff
path: root/src/boot/me/alias.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/me/alias.ml')
-rw-r--r--src/boot/me/alias.ml5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/boot/me/alias.ml b/src/boot/me/alias.ml
index d98316ef..148f1249 100644
--- a/src/boot/me/alias.ml
+++ b/src/boot/me/alias.ml
@@ -67,7 +67,7 @@ let alias_analysis_visitor
| Ast.STMT_recv (dst, _) -> alias dst
| Ast.STMT_init_port (dst) -> alias dst
| Ast.STMT_init_chan (dst, _) -> alias dst
- | Ast.STMT_init_vec (dst, _) -> alias dst
+ | Ast.STMT_init_vec (dst, _, _) -> alias dst
| Ast.STMT_init_str (dst, _) -> alias dst
| Ast.STMT_for_each sfe ->
let (slot, _) = sfe.Ast.for_each_slot in
@@ -118,7 +118,8 @@ let process_crate
Walk.empty_visitor);
|]
in
- run_passes cx "alias" path passes (log cx "%s") crate
+ run_passes cx "alias" path passes
+ cx.ctxt_sess.Session.sess_log_alias log crate
;;
(*