Ver código fonte

* local variables in fpc_AnsiStr_Concat_multi changed from longint to nativeint

git-svn-id: trunk@26926 -
nickysn 11 anos atrás
pai
commit
ad45bc17ec
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      rtl/inc/astrings.inc

+ 1 - 1
rtl/inc/astrings.inc

@@ -292,7 +292,7 @@ procedure fpc_AnsiStr_Concat_multi (var DestS:RawByteString;const sarr:array of
 Var
   lowstart,
   nonemptystart,
-  i           : Longint;
+  i           : NativeInt;
   p,pc        : pointer;
   Size,NewLen,
   OldDestLen  : SizeInt;