diff options
author | laksen <laksen@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2015-12-03 21:43:39 +0000 |
---|---|---|
committer | laksen <laksen@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2015-12-03 21:43:39 +0000 |
commit | 59fe21b174750352cf15ea9b11ddf421d1f21a16 (patch) | |
tree | 7b121d9bbfa54263ab45eb29b5cd207787372316 /compiler/ncgld.pas | |
parent | 6f45f9b0223c5088079e509b8a3b88d0f52ce02f (diff) | |
download | fpc-59fe21b174750352cf15ea9b11ddf421d1f21a16.tar.gz |
Fix issue with absolute offsets being sign extended from aint to asizeint.
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@32576 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'compiler/ncgld.pas')
-rw-r--r-- | compiler/ncgld.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ncgld.pas b/compiler/ncgld.pas index 04e649c3e7..9504f48320 100644 --- a/compiler/ncgld.pas +++ b/compiler/ncgld.pas @@ -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; |