Преглед на файлове

* lfanew in dosheader aliased with union

git-svn-id: trunk@10229 -
marco преди 17 години
родител
ревизия
51dc129916
променени са 1 файла, в които са добавени 3 реда и са изтрити 1 реда
  1. 3 1
      rtl/win/wininc/struct.inc

+ 3 - 1
rtl/win/wininc/struct.inc

@@ -6917,7 +6917,9 @@ Const
           e_oemid : WORD;
           e_oeminfo : WORD;
           e_res2 : array[0..9] of WORD;
-          e_lfanew : LONG;
+          case boolean of 
+             true : (e_lfanew : LONG);
+             false: (_lfanew : LONG); // delphi naming
        end;
      PIMAGE_DOS_HEADER = ^IMAGE_DOS_HEADER;
      TIMAGE_DOS_HEADER = IMAGE_DOS_HEADER;