From 1f9fd2710ec9122ddddcedaab51650a92ad7c8cf Mon Sep 17 00:00:00 2001 From: Graydon Hoare Date: Tue, 29 Jun 2010 12:00:15 -0700 Subject: Initial stab at lowering mutable and exterior into the type system. --- src/boot/me/alias.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/boot/me/alias.ml') diff --git a/src/boot/me/alias.ml b/src/boot/me/alias.ml index 25d4ed04..b603e779 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 -- cgit v1.2.3