From 346f040a541a85d2ef666fac9835a48a4a2bd0f3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?K=C3=A1roly=20Balogh?= Date: Tue, 23 May 2017 07:32:54 +0000 Subject: [PATCH] also try to inline 32bit SwapEndian variants, as they're still reasonably simple git-svn-id: trunk@36304 - --- rtl/inc/generic.inc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/rtl/inc/generic.inc b/rtl/inc/generic.inc index ca4eeda8b7..bd1c60b783 100644 --- a/rtl/inc/generic.inc +++ b/rtl/inc/generic.inc @@ -2268,14 +2268,14 @@ function SwapEndian(const AValue: Word): Word;{$ifdef SYSTEMINLINE}inline;{$endi end; {$endif} -function SwapEndian(const AValue: LongInt): LongInt; +function SwapEndian(const AValue: LongInt): LongInt;{$ifdef SYSTEMINLINE}inline;{$endif} begin Result := ((AValue shl 8) and $FF00FF00) or ((AValue shr 8) and $00FF00FF); Result := (Result shl 16) or (Result shr 16); end; {$ifndef cpujvm} -function SwapEndian(const AValue: DWord): DWord; +function SwapEndian(const AValue: DWord): DWord;{$ifdef SYSTEMINLINE}inline;{$endif} begin Result := ((AValue shl 8) and $FF00FF00) or ((AValue shr 8) and $00FF00FF); Result := (Result shl 16) or (Result shr 16);