Przeglądaj źródła

* use PtrUInt instead of Cardinal in GenericAnsiStrLComp and GenericAnsiStrLIComp, resolves #29815

git-svn-id: trunk@33218 -
florian 9 lat temu
rodzic
commit
8b81ce7e25
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      rtl/objpas/sysutils/sysstr.inc

+ 2 - 2
rtl/objpas/sysutils/sysstr.inc

@@ -347,7 +347,7 @@ end;
 
 function GenericAnsiStrLComp(S1, S2: PChar; MaxLen: PtrUInt): PtrInt;
 
-Var I : cardinal;
+Var I : PtrUInt;
 
 begin
   Result:=0;
@@ -375,7 +375,7 @@ end;
 
 function GenericAnsiStrLIComp(S1, S2: PChar; MaxLen: PtrUInt): PtrInt;
 
-Var I : cardinal;
+Var I : PtrUInt;
 
 begin
   Result:=0;