paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-16 08:06:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use SizeInt instead of LongInt for the size fields of the VMT to match what the compiler generates for non-32-bit targets

Browse Source 
git-svn-id: trunk@39727 -
This commit is contained in:
svenbarth 2018-09-10 20:57:04 +00:00
parent b219fa9023
commit 5d9ddf99d4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl-extra/src/inc/objects.pp
View File

@ -1013,7 +1013,7 @@ TYPE
PVMT=^VMT;
PPVMT=^PVMT;
VMT=RECORD
Size,NegSize:Longint;
Size,NegSize:SizeInt;
ParentLink:PPVMT;
END;
VAR SP:PPVMT; Q:PVMT;