rtl: remove spaces

git-svn-id: trunk@20284 -

rtl/inc/astrings.inc

@@ -791,7 +791,7 @@ begin
 end;
 {$endif FPC_SYSTEM_HAS_ANSISTR_UNIQUE}
 
-Function Fpc_Ansistr_Copy(Const S : RawByteString; Index,Size : SizeInt) : RawByteString;compilerproc;
+Function Fpc_Ansistr_Copy(Const S : RawByteString; Index,Size : SizeInt): RawByteString;compilerproc;
 var
   ResultAddress : Pointer;
 begin
@@ -809,7 +809,7 @@ begin
      ResultAddress:=NewAnsiString(Size);
      if ResultAddress<>Nil then
       begin
-        Move (Pointer(Pointer(S)+index)^,ResultAddress^,Size);
+        Move(Pointer(Pointer(S)+index)^,ResultAddress^,Size);
         PByte(ResultAddress+Size)^:=0;
         PAnsiRec(ResultAddress-AnsiFirstOff)^.Len:=Size;
         PAnsiRec(ResultAddress-AnsiFirstOff)^.CodePage:=PAnsiRec(Pointer(S)-AnsiFirstOff)^.CodePage;

rtl/inc/compproc.inc

@@ -236,7 +236,7 @@ Procedure fpc_AnsiStr_CheckRange(p : Pointer; index : SizeInt); compilerproc;
 {$endif VER2_4}
 
 Procedure fpc_AnsiStr_SetLength (Var S : RawByteString; l : SizeInt{$ifdef FPC_HAS_CPSTRING};cp : TSystemCodePage{$endif FPC_HAS_CPSTRING}); compilerproc;
-Function  fpc_ansistr_Copy (Const S : RawByteString; Index,Size : SizeInt) : RawByteString;compilerproc;
+Function  fpc_ansistr_Copy (Const S : RawByteString; Index,Size : SizeInt): RawByteString;compilerproc;
 {$ifdef EXTRAANSISHORT}
 Function fpc_AnsiStr_ShortStr_Compare (Var S1 : Pointer; Var S2 : ShortString): SizeInt; compilerproc;
 {$endif EXTRAANSISHORT}