Kaynağa Gözat

* dump usefieldalignment for recorddefs

git-svn-id: trunk@4720 -
Jonas Maebe 19 yıl önce
ebeveyn
işleme
2639b104cc
1 değiştirilmiş dosya ile 1 ekleme ve 0 silme
  1. 1 0
      compiler/utils/ppudump.pp

+ 1 - 0
compiler/utils/ppudump.pp

@@ -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}