summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorpierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-03-15 13:24:27 +0000
committerpierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-03-15 13:24:27 +0000
commit603696fc7561c5ef1e9e3d10add7483c579420b7 (patch)
treeef2c9c1dc1b52976030cc64b88e3fd114d61b9ce
parentaeb82083f62c78910410e6aa0414191e6ee621da (diff)
downloadfpc-603696fc7561c5ef1e9e3d10add7483c579420b7.tar.gz
Use uvalue field to get unsigned and avoid range check or overflow errors
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@48977 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--compiler/x86/nx86mat.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/x86/nx86mat.pas b/compiler/x86/nx86mat.pas
index 19359e2e0a..8ef1db38dc 100644
--- a/compiler/x86/nx86mat.pas
+++ b/compiler/x86/nx86mat.pas
@@ -464,7 +464,7 @@ interface
end
else
begin
- d:=tordconstnode(right).value.svalue;
+ d:=tordconstnode(right).value.uvalue;
if d>=aword(1) shl (left.resultdef.size*8-1) then
begin
location.register:=cg.getintregister(current_asmdata.CurrAsmList,cgsize);