paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-06 03:10:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

* RTTI: Offset of record fields is defined as SizeInt not ptruint.

Browse Source 
git-svn-id: trunk@46460 -
This commit is contained in:
yury 2020-08-16 13:27:56 +00:00
parent a88288bab3
commit b4139720e6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/ncgrtti.pas
View File

@ -623,7 +623,7 @@ implementation
begin
sym:=tsym(fields[i]);
write_rtti_reference(tcb,tfieldvarsym(sym).vardef,rt);
tcb.emit_ord_const(tfieldvarsym(sym).fieldoffset,ptruinttype);
tcb.emit_ord_const(tfieldvarsym(sym).fieldoffset,sizeuinttype);
end;
fields.free;
end;