nordic-dev.net/rust
nordic-dev.net/rust
2
0
Fork 0
mirror of https://github.com/rust-lang/rust.git synced 2025-05-14 02:49:40 +00:00
Code Issues Packages Projects Releases Wiki Activity

Put out burning tinderbox on OSX.

Browse Source
This commit is contained in:
Graydon Hoare 2010-08-10 16:49:36 -07:00
parent 5d2e94838e
commit 60e5ad384e
2 changed files with 18 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Makefile
View File

@ -398,6 +398,7 @@ TEST_XFAILS_X86 := $(TASK_XFAILS) \
test/run-pass/generic-recursive-tag.rs \ test/run-pass/generic-recursive-tag.rs \
test/run-pass/int-lib.rs \ test/run-pass/int-lib.rs \
test/run-pass/iter-ret.rs \ test/run-pass/iter-ret.rs \
test/run-pass/lib-deque.rs \
test/run-pass/lib-map.rs \ test/run-pass/lib-map.rs \
test/run-pass/mlist-cycle.rs \ test/run-pass/mlist-cycle.rs \
test/run-pass/obj-as.rs \ test/run-pass/obj-as.rs \

11
src/boot/be/x86.ml
View File

@ -311,6 +311,16 @@ let emit_target_specific
Il.Mem (Il.next_spill_slot e Il.Mem (Il.next_spill_slot e
(Il.ScalarTy (Il.operand_scalar_ty op))) (Il.ScalarTy (Il.operand_scalar_ty op)))
in in
let is_eax cell =
match cell with
Il.Cell (Il.Reg (Il.Hreg hr, _)) -> hr = eax
| _ -> false
in
if is_eax lhs
then
mov rhs_ecx rhs
else
begin
let lhs_spill = next_spill_like lhs in let lhs_spill = next_spill_like lhs in
let rhs_spill = next_spill_like rhs in let rhs_spill = next_spill_like rhs in
@ -319,6 +329,7 @@ let emit_target_specific
mov lhs_eax (Il.Cell lhs_spill); mov lhs_eax (Il.Cell lhs_spill);
mov rhs_ecx (Il.Cell rhs_spill); mov rhs_ecx (Il.Cell rhs_spill);
end;
put (Il.Binary put (Il.Binary
{ b with { b with