From d2ac820e41778f3cc6aef272ba2baed0b9f2dfff Mon Sep 17 00:00:00 2001 From: Xavier Leroy Date: Sun, 30 Jul 1995 14:26:43 +0000 Subject: emit_alpha: on gratte un cycle sur le Lswitch a 3 cas. emit_sparc: bug dans le transfert reg flottant -> regs entiers non alignes. emit_i386: faire pop apres l'appel d'une fonction C retournant un flottant; optimisation cmpl $0 -> testl proc_i386: plus de contraintes sur div et mod. git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@175 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02 --- asmcomp/emit_sparc.mlp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'asmcomp/emit_sparc.mlp') diff --git a/asmcomp/emit_sparc.mlp b/asmcomp/emit_sparc.mlp index ba60ca2b62..be804cd74f 100644 --- a/asmcomp/emit_sparc.mlp +++ b/asmcomp/emit_sparc.mlp @@ -225,7 +225,7 @@ let emit_instr i = ` ldd [%sp + 96], {emit_reg dst}\n` else begin ` ld [%sp + 96], {emit_reg dst}\n`; - ` ld [%sp + 96], {emit_reg(next_in_pair dst)}\n` + ` ld [%sp + 100], {emit_reg(next_in_pair dst)}\n` end; ` add %sp, 8, %sp\n` | {loc = Reg rs; typ = (Int | Addr)}, {loc = Stack sd} -> -- cgit v1.2.1