mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-03 21:50:18 +02:00
* change address related variables from aint to PInt to avoid range check errors
git-svn-id: trunk@33701 -
This commit is contained in:
parent
8e75ac64f1
commit
35b18fbf85
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user