diff options
author | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2006-06-19 19:29:29 +0000 |
---|---|---|
committer | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2006-06-19 19:29:29 +0000 |
commit | 8c212ade722f0f46ab7e8d9fddfe5769ee6e2bed (patch) | |
tree | a12cc30c0767380fcaf06c0df5beabc324b4a985 /ortho/mcode | |
parent | a8db752954f060217f21417bd98077a215fab971 (diff) | |
download | ghdl-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.adb | 6 |
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); |