* don't call swapendian for shortint (it's 1 byte -> upcast to word and then

swapped, which is wrong)

git-svn-id: trunk@25949 -
This commit is contained in:
Jonas Maebe 2013-11-06 09:44:29 +00:00
parent d62b78224a
commit 98a230d20f

View File

@ -2715,9 +2715,6 @@ type
procedure tscannerfile.tokenwriteshortint(val : shortint);
begin
{$ifdef FPC_BIG_ENDIAN}
val:=swapendian(val);
{$endif}
recordtokenbuf.write(val,sizeof(shortint));
end;