aboutsummaryrefslogtreecommitdiff
path: root/src/boot/be/x86.ml
diff options
context:
space:
mode:
authorGraydon Hoare <[email protected]>2010-10-05 18:09:49 -0700
committerGraydon Hoare <[email protected]>2010-10-05 18:09:49 -0700
commitcdf67b1f2e34ceb27a922cde7edc526597200b96 (patch)
tree828af70a52db9bd6e902010b408e18b862064023 /src/boot/be/x86.ml
parentUse RTLD_GLOBAL when loading libraries. This is needed to get LLVM working on... (diff)
downloadrust-cdf67b1f2e34ceb27a922cde7edc526597200b96.tar.xz
rust-cdf67b1f2e34ceb27a922cde7edc526597200b96.zip
Better backpointer logic.
Diffstat (limited to 'src/boot/be/x86.ml')
-rw-r--r--src/boot/be/x86.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/boot/be/x86.ml b/src/boot/be/x86.ml
index eb96d0ac..468d1ab1 100644
--- a/src/boot/be/x86.ml
+++ b/src/boot/be/x86.ml
@@ -1078,17 +1078,17 @@ let rec calculate_sz
mov (rc eax) (Il.Cell closure_ptr);
let obj_body = word_n (h eax) Abi.box_rc_field_body in
- let obj_body = Il.ptr_cast obj_body obj_box_rty in
+ let obj_body = Il.cell_cast obj_body obj_box_rty in
let tydesc_ptr = get_element_ptr obj_body Abi.obj_body_elt_tydesc in
mov (rc eax) (Il.Cell tydesc_ptr);
- let tydesc = Il.ptr_cast (word_at (h eax)) tydesc_rty in
+ let tydesc = Il.cell_cast (word_at (h eax)) tydesc_rty in
let ty_params_ptr =
get_element_ptr tydesc Abi.tydesc_field_first_param
in
mov (rc eax) (Il.Cell ty_params_ptr);
- let ty_params = Il.ptr_cast (word_at (h eax)) ty_params_rty in
+ let ty_params = Il.cell_cast (word_at (h eax)) ty_params_rty in
get_element_ptr ty_params i
in