Преглед изворни кода

Fix issue with absolute offsets being sign extended from aint to asizeint.

git-svn-id: trunk@32576 -
Jeppe Johansen пре 9 година
родитељ
комит
f21f9ab930
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/ncgld.pas

+ 1 - 1
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;