aboutsummaryrefslogtreecommitdiffstats
path: root/ortho/mcode
diff options
context:
space:
mode:
authorgingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7>2006-06-19 19:29:29 +0000
committergingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7>2006-06-19 19:29:29 +0000
commit8c212ade722f0f46ab7e8d9fddfe5769ee6e2bed (patch)
treea12cc30c0767380fcaf06c0df5beabc324b4a985 /ortho/mcode
parenta8db752954f060217f21417bd98077a215fab971 (diff)
downloadghdl-8c212ade722f0f46ab7e8d9fddfe5769ee6e2bed.tar.gz
ghdl-8c212ade722f0f46ab7e8d9fddfe5769ee6e2bed.tar.bz2
ghdl-8c212ade722f0f46ab7e8d9fddfe5769ee6e2bed.zip
bug fixes
Diffstat (limited to 'ortho/mcode')
-rw-r--r--ortho/mcode/ortho_code-x86-insns.adb6
1 files changed, 3 insertions, 3 deletions
diff --git a/ortho/mcode/ortho_code-x86-insns.adb b/ortho/mcode/ortho_code-x86-insns.adb
index 86fcb3cde..09dfdd7a4 100644
--- a/ortho/mcode/ortho_code-x86-insns.adb
+++ b/ortho/mcode/ortho_code-x86-insns.adb
@@ -1463,7 +1463,7 @@ package body Ortho_Code.X86.Insns is
end if;
Set_Expr_Reg (Stmt, Alloc_Reg (Reg_Res, Stmt, Pnum));
Link_Stmt (Stmt);
- return Stmt;
+ return Reload (Stmt, Reg, Pnum);
when Mode_U64
| Mode_I64 =>
Insert_Arg (Gen_Insn (Right, R_Irm, Num));
@@ -1519,8 +1519,8 @@ package body Ortho_Code.X86.Insns is
return Stmt;
when OE_Conv =>
declare
- O_Mode : Mode_Type;
- R_Mode : Mode_Type;
+ O_Mode : Mode_Type; -- Operand mode
+ R_Mode : Mode_Type; -- Result mode
begin
Left := Get_Expr_Operand (Stmt);
O_Mode := Get_Expr_Mode (Left);