* TResourceStringTableList.Count type changed from ptrint to nativeint. Both

types are the same on almost all platforms. The only difference is on i8086,
  where ptrint changes according to the memory model, while nativeint stays
  16-bit. In the compiler, the count is emitted with Tai_const.Create_pint,
  which also stays 16-bit in all memory models, so the correct corresponding
  type in the rtl is nativeint.

git-svn-id: trunk@26920 -
This commit is contained in:
nickysn 2014-03-02 12:47:32 +00:00
parent 0d1342a791
commit 49b65fedd9

View File

@ -295,7 +295,7 @@ Type
end;
TResourceStringTableList = Packed Record
Count : ptrint;
Count : nativeint;
Tables : Array[{$ifdef cpu16}Byte{$else cpu16}Word{$endif cpu16}] of record
TableStart,
TableEnd : PResourceStringRecord;