paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 14:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed indentation

Browse Source 
git-svn-id: trunk@13575 -
This commit is contained in:
Jonas Maebe 2009-08-22 20:13:57 +00:00
parent a1363e95f7
commit f2691c4ebf
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/dbgdwarf.pas
View File

@ -1344,13 +1344,13 @@ implementation
if not is_packed_array(def) then if not is_packed_array(def) then
begin begin
elestrideattr := DW_AT_byte_stride; elestrideattr := DW_AT_byte_stride;
elesize := def.elesize; elesize := def.elesize;
end end
else else
begin begin
elestrideattr := DW_AT_stride_size; elestrideattr := DW_AT_stride_size;
elesize := def.elepackedbitsize; elesize := def.elepackedbitsize;
end; end;
if is_special_array(def) then if is_special_array(def) then