Browse Source

* applied packed record fix from Tomas

armin 20 years ago
parent
commit
6c4d142a0f
1 changed files with 6 additions and 3 deletions
  1. 6 3
      ide/vesa.pas

+ 6 - 3
ide/vesa.pas

@@ -64,7 +64,7 @@ type
        Ofs,Seg: word;
      end;
 
-     TVESAInfoBlock = record
+     TVESAInfoBlock = packed record
        Signature    : longint; {  'VESA' }
        Version      : word;
        OEMString    : PString;
@@ -75,7 +75,7 @@ type
        VBE2Fill     : array[1..256] of byte;
      end;
 
-     TVESAModeInfoBlock = record
+     TVESAModeInfoBlock = packed record
        Attributes      : word;
        WinAAttrs       : byte;
        WinBAttrs       : byte;
@@ -715,7 +715,10 @@ BEGIN
 END.
 {
   $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
 
   Revision 1.7  2002/05/29 22:39:51  pierre