Skip to content

Commit 7e733bf

Browse files
committed
Allow tag recursion through vectors as well as boxes
1 parent f13306e commit 7e733bf

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/boot/me/type.ml

+1-1
Original file line numberDiff line numberDiff line change
@@ -1012,7 +1012,7 @@ let populate_tag_graph_node (cx:Semant.ctxt) (id:Common.opaque_id) (n:int) =
10121012
| Ast.TY_rec ty_rec ->
10131013
Array.iter (fun (_, ty) -> add_ty ty) ty_rec
10141014
| Ast.TY_fn ty_fn -> add_ty_fn ty_fn
1015-
| Ast.TY_vec ty | Ast.TY_chan ty | Ast.TY_port ty | Ast.TY_mutable ty
1015+
| Ast.TY_chan ty | Ast.TY_port ty | Ast.TY_mutable ty
10161016
| Ast.TY_constrained (ty, _) -> add_ty ty
10171017
| Ast.TY_obj (_, ty_fns) ->
10181018
Hashtbl.iter (fun _ ty_fn -> add_ty_fn ty_fn) ty_fns

0 commit comments

Comments
 (0)