2
0
Эх сурвалжийг харах

also try to inline 32bit SwapEndian variants, as they're still reasonably simple

git-svn-id: trunk@36304 -
Károly Balogh 8 жил өмнө
parent
commit
346f040a54
1 өөрчлөгдсөн 2 нэмэгдсэн , 2 устгасан
  1. 2 2
      rtl/inc/generic.inc

+ 2 - 2
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);