Просмотр исходного кода

Add unit specifiers for tlsdirectory fields: they need to be PUInt from globtype unit

Pierre Muller 1 год назад
Родитель
Сommit
ff673eadac
1 измененных файлов с 2 добавлено и 2 удалено
  1. 2 2
      compiler/ogcoff.pas

+ 2 - 2
compiler/ogcoff.pas

@@ -566,8 +566,8 @@ implementation
 
        { This is defined in rtl/win/sysos.inc source }
        tlsdirectory=packed record
-         data_start, data_end : PUInt;
-         index_pointer, callbacks_pointer : PUInt;
+         data_start, data_end : globtype.PUInt;
+         index_pointer, callbacks_pointer : globtype.PUInt;
          zero_fill_size : dword;
          flags : dword;
        end;