paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 11:19:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: trunk@33218 -
This commit is contained in:
florian 2016-03-11 20:38:48 +00:00
parent 0bfdfe20ea
commit 8b81ce7e25
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/objpas/sysutils/sysstr.inc
View File

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