aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/boot/me/trans.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/boot/me/trans.ml b/src/boot/me/trans.ml
index edbfd06e..c222fc70 100644
--- a/src/boot/me/trans.ml
+++ b/src/boot/me/trans.ml
@@ -5110,8 +5110,8 @@ let trans_visitor
when e = simplified_ty elt_ty ->
let elt_sz = ty_sz_in_current_frame elt_ty in
- let elt_sz_cell = next_vreg_cell word_sty in
- mov elt_sz_cell elt_sz;
+ let elt_sz_cell = Il.Reg (force_to_reg elt_sz) in
+ let elt_sz = Il.Cell elt_sz_cell in
aliasing true dst_cell
begin