paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-18 05:39:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix mul opsize

Browse Source 
git-svn-id: trunk@8131 -
This commit is contained in:
daniel 2007-07-22 11:48:10 +00:00
parent bee56abb78
commit 5add416dab
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/x86_64/nx64add.pas
View File

@ -80,9 +80,9 @@ interface
{ Also allocate RDX, since it is also modified by a mul (JM). }
cg.getcpuregister(current_asmdata.CurrAsmList,NR_RDX);
if use_ref then
emit_ref(A_MUL,S_L,ref)
emit_ref(A_MUL,S_Q,ref)
else
emit_reg(A_MUL,S_L,reg);
emit_reg(A_MUL,S_Q,reg);
if cs_check_overflow in current_settings.localswitches then
begin
current_asmdata.getjumplabel(hl4);