diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 1995-07-30 14:26:43 +0000 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 1995-07-30 14:26:43 +0000 |
| commit | d2ac820e41778f3cc6aef272ba2baed0b9f2dfff (patch) | |
| tree | 437e65a0ac9319d7959806ee27726c5d97a4dc49 /asmcomp/emit_sparc.mlp | |
| parent | 8e47f3267113b7496b6fe8e3d65ed7c085d37d6a (diff) | |
| download | ocaml-d2ac820e41778f3cc6aef272ba2baed0b9f2dfff.tar.gz | |
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
Diffstat (limited to 'asmcomp/emit_sparc.mlp')
| -rw-r--r-- | asmcomp/emit_sparc.mlp | 2 |
1 files changed, 1 insertions, 1 deletions
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} -> |