From 5db3f6ef6a81b6c54f100c2fc8bc7ecf073ec683 Mon Sep 17 00:00:00 2001 From: Graydon Hoare Date: Sun, 4 Jul 2010 01:06:29 -0700 Subject: Spill immediates with proper IL type (was making valgrind dislike obj-with-vec.rs). --- src/boot/me/trans.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/boot/me/trans.ml b/src/boot/me/trans.ml index 48bf3d90..e6662ed6 100644 --- a/src/boot/me/trans.ml +++ b/src/boot/me/trans.ml @@ -364,7 +364,7 @@ let trans_visitor match src with Il.Cell (Il.Mem ta) -> ta | Il.Cell (Il.Reg (_, t)) -> do_spill src t - | Il.Imm _ -> do_spill src (Il.ValTy word_bits) + | Il.Imm (_,tm) -> do_spill src (Il.ValTy (Il.bits_of_ty_mach tm)) | Il.ImmPtr (f, rty) -> do_spill (Il.Cell (crate_rel_to_ptr (crate_rel_imm f) rty)) -- cgit v1.2.3