瀏覽代碼

Avoid range/overflow error after commit #49290

git-svn-id: trunk@49298 -
pierre 4 年之前
父節點
當前提交
5ef44c550a
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/aarch64/ncpumat.pas

+ 2 - 2
compiler/aarch64/ncpumat.pas

@@ -337,8 +337,8 @@ implementation
                 else
                   begin
                     calc_divconst_magic_unsigned(resultdef.size * 8, tordconstnode(right).value, reciprocal, magic_add, shift);
-                    cg.a_load_const_reg(current_asmdata.CurrAsmList, opsize, reciprocal, resultreg);
-
+                    { Add explicit typecast to tcgint type, to avoid range or overflow check }
+                    cg.a_load_const_reg(current_asmdata.CurrAsmList, opsize, tcgint(reciprocal), resultreg);
                     { UMULH is only available for the full 64-bit registers }
                     if opsize in [OS_64, OS_S64] then
                       begin