Browse Source

Fix ash_savefregp_x handling, as revealed by range check error

git-svn-id: trunk@47773 -
pierre 4 năm trước cách đây
mục cha
commit
eb722c8294
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      compiler/aarch64/agcpugas.pas

+ 1 - 1
compiler/aarch64/agcpugas.pas

@@ -229,7 +229,7 @@ unit agcpugas;
                   begin
                     check_offset(seh.data.offset,512);
                     check_reg(seh.data.reg,R_MMREGISTER,min_mm_reg);
-                    writeword($DA00 or ((getsupreg(seh.data.reg)-min_int_reg) shl 6) or ((seh.data.offset shr 3)-1));
+                    writeword($DA00 or ((getsupreg(seh.data.reg)-min_mm_reg) shl 6) or ((seh.data.offset shr 3)-1));
                   end;
                 else
                   internalerror(2020041503);