* use reverse_longword() instead of reverse_byte(); fixes the management operators of records inside classes on big endian systems

git-svn-id: trunk@39265 -
This commit is contained in:
svenbarth 2018-06-20 21:11:19 +00:00
parent af6f094420
commit 3f96c0baed

View File

@ -421,7 +421,7 @@ implementation
{ keep this in sync with the type declaration of TRecordInfoInitFlag(s)
in both rttidecl.inc and typinfo.pp }
if target_info.endian=endian_big then
value:=reverse_byte(value);
value:=reverse_longword(value);
tcb.emit_ord_const(value,u32inttype);
end;