Преглед на файлове

* properly calc new src register for OP_XOR

git-svn-id: trunk@45743 -
florian преди 5 години
родител
ревизия
792eafadef
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      compiler/aarch64/cgcpu.pas

+ 1 - 1
compiler/aarch64/cgcpu.pas

@@ -1132,7 +1132,7 @@ implementation
               if shuffle=nil then
                 begin
                   dst:=newreg(R_MMREGISTER,getsupreg(dst),R_SUBMM16B);
-                  src:=newreg(R_MMREGISTER,getsupreg(dst),R_SUBMM16B);
+                  src:=newreg(R_MMREGISTER,getsupreg(src),R_SUBMM16B);
                   list.concat(taicpu.op_reg_reg_reg(A_EOR,dst,dst,src))
                 end
               else if (src<>dst) or