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

* another alignment fix

Browse Source
This commit is contained in:
florian 2004-12-27 16:16:24 +00:00
parent d6ad150474
commit 783a04af23
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/objpas/typinfo.pp
View File

@ -132,6 +132,7 @@ unit typinfo;
); );
end; end;
{$PACKRECORDS C}
// unsed, just for completeness // unsed, just for completeness
TPropData = TPropData =
{$ifndef FPC_REQUIRES_PROPER_ALIGNMENT} {$ifndef FPC_REQUIRES_PROPER_ALIGNMENT}
@ -141,6 +142,7 @@ unit typinfo;
PropCount : Word; PropCount : Word;
PropList : record _alignmentdummy : ptrint; end; PropList : record _alignmentdummy : ptrint; end;
end; end;
{$PACKRECORDS 1}
PPropInfo = ^TPropInfo; PPropInfo = ^TPropInfo;
TPropInfo = packed record TPropInfo = packed record
@ -1490,7 +1492,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.31 2004-11-24 22:27:24 florian Revision 1.32 2004-12-27 16:16:24 florian
* another alignment fix
Revision 1.31 2004/11/24 22:27:24 florian
* fixed tpropdata record * fixed tpropdata record
Revision 1.30 2004/10/10 19:18:31 florian Revision 1.30 2004/10/10 19:18:31 florian