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

* applied packed record fix from Tomas

Browse Source
This commit is contained in:
armin 2005-01-28 10:05:44 +00:00
parent f2607e4c1c
commit 6c4d142a0f
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/vesa.pas
View File

@ -64,7 +64,7 @@ type
Ofs,Seg: word; Ofs,Seg: word;
end; end;
TVESAInfoBlock = record TVESAInfoBlock = packed record
Signature : longint; { 'VESA' } Signature : longint; { 'VESA' }
Version : word; Version : word;
OEMString : PString; OEMString : PString;
@ -75,7 +75,7 @@ type
VBE2Fill : array[1..256] of byte; VBE2Fill : array[1..256] of byte;
end; end;
TVESAModeInfoBlock = record TVESAModeInfoBlock = packed record
Attributes : word; Attributes : word;
WinAAttrs : byte; WinAAttrs : byte;
WinBAttrs : byte; WinBAttrs : byte;
@ -715,7 +715,10 @@ BEGIN
END. END.
{ {
$Log$ $Log$
Revision 1.8 2002-09-07 15:40:47 peter Revision 1.9 2005-01-28 10:05:44 armin
* applied packed record fix from Tomas
Revision 1.8 2002/09/07 15:40:47 peter
* old logs removed and tabs fixed * old logs removed and tabs fixed
Revision 1.7 2002/05/29 22:39:51 pierre Revision 1.7 2002/05/29 22:39:51 pierre