summaryrefslogtreecommitdiff
path: root/asmcomp/i386/emit_nt.mlp
diff options
context:
space:
mode:
Diffstat (limited to 'asmcomp/i386/emit_nt.mlp')
-rw-r--r--asmcomp/i386/emit_nt.mlp2
1 files changed, 1 insertions, 1 deletions
diff --git a/asmcomp/i386/emit_nt.mlp b/asmcomp/i386/emit_nt.mlp
index e4ac9d408d..a0c94e181d 100644
--- a/asmcomp/i386/emit_nt.mlp
+++ b/asmcomp/i386/emit_nt.mlp
@@ -379,7 +379,7 @@ let emit_instr i =
if is_tos src then
` fstp {emit_reg dst}\n`
else if is_tos dst then
- ` fld {emit_reg dst}\n`
+ ` fld {emit_reg src}\n`
else begin
` fld {emit_reg src}\n`;
` fstp {emit_reg dst}\n`