Explorar o código

+ fixed a bug in the previous commit, when adding two references, the first
containing a base register, the second - an index register with a scalefactor.
The scalefactor was ignored in this case.

git-svn-id: trunk@38354 -

nickysn %!s(int64=7) %!d(string=hai) anos
pai
achega
f623038da6
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      compiler/x86/rax86int.pas

+ 1 - 0
compiler/x86/rax86int.pas

@@ -814,6 +814,7 @@ Unit Rax86int;
           if dest.opr.ref.index=NR_NO then
             begin
               dest.opr.ref.index:=reg;
+              dest.opr.ref.scalefactor:=scalefactor;
               exit;
             end;
           if dest.opr.ref.index=reg then