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

* dump usefieldalignment for recorddefs

Browse Source 
git-svn-id: trunk@4720 -
This commit is contained in:
Jonas Maebe 2006-09-24 18:49:12 +00:00
parent acd485d5fb
commit 2639b104cc
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/utils/ppudump.pp
View File

@ -1801,6 +1801,7 @@ begin
writeln(space,' FieldAlign : ',getbyte);
writeln(space,' RecordAlign : ',getbyte);
writeln(space,' PadAlign : ',getbyte);
writeln(space,'UseFieldAlignment : ',getbyte);
if not EndOfEntry then
Writeln('!! Entry has more information stored');
{read the record definitions and symbols}