aboutsummaryrefslogtreecommitdiff
path: root/src/boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot')
-rw-r--r--src/boot/me/trans.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/me/trans.ml b/src/boot/me/trans.ml
index abeff66e..7cefa5af 100644
--- a/src/boot/me/trans.ml
+++ b/src/boot/me/trans.ml
@@ -2616,7 +2616,7 @@ let trans_visitor
(cell:Il.cell)
(curr_iso:Ast.ty_iso option)
: unit =
- match ty with
+ match simplified_ty ty with
Ast.TY_port _ -> trans_del_port cell
| Ast.TY_chan _ -> trans_del_chan cell
| Ast.TY_task -> trans_kill_task cell