mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-31 17:10:14 +02:00
Fix issue with absolute offsets being sign extended from aint to asizeint.
git-svn-id: trunk@32576 -
This commit is contained in:
parent
b5c9a20d3f
commit
f21f9ab930
@ -249,7 +249,7 @@ implementation
|
||||
|
||||
procedure tcgloadnode.generate_absaddr_access(vs: tabsolutevarsym);
|
||||
begin
|
||||
location.reference.offset:=aint(vs.addroffset);
|
||||
location.reference.offset:=asizeint(vs.addroffset);
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user