Pārlūkot izejas kodu

* change address related variables from aint to PInt to avoid range check errors

git-svn-id: trunk@33701 -
florian 9 gadi atpakaļ
vecāks
revīzija
35b18fbf85
1 mainītis faili ar 2 papildinājumiem un 2 dzēšanām
  1. 2 2
      compiler/dbgdwarf.pas

+ 2 - 2
compiler/dbgdwarf.pas

@@ -1683,8 +1683,8 @@ implementation
 
     procedure TDebugInfoDwarf.appenddef_array(list:TAsmList;def:tarraydef);
       var
-        size : aint;
-        elesize : aint;
+        size : PInt;
+        elesize : PInt;
         elestrideattr : tdwarf_attribute;
         labsym: tasmlabel;
       begin