瀏覽代碼

* Correct casing of rposex - fix issue #39466

Michaël Van Canneyt 3 年之前
父節點
當前提交
cbc2d0351c
共有 1 個文件被更改,包括 4 次插入4 次删除
  1. 4 4
      packages/rtl-objpas/src/inc/strutils.pp

+ 4 - 4
packages/rtl-objpas/src/inc/strutils.pp

@@ -3028,7 +3028,7 @@ begin
     end;
 end;
 
-function RPosEX(C: char; const S: AnsiString; offs: cardinal): SizeInt;
+function RPosEx(C: char; const S: AnsiString; offs: cardinal): SizeInt;
 
 var I   : SizeUInt;
     p,p2: pChar;
@@ -3091,7 +3091,7 @@ begin
    end;
 end;
 
-function RPosex(const Substr: AnsiString; const Source: AnsiString; offs: cardinal): SizeInt;
+function RPosEx(const Substr: AnsiString; const Source: AnsiString; offs: cardinal): SizeInt;
 var
   MaxLen,llen : SizeInt;
   c : char;
@@ -3120,7 +3120,7 @@ begin
    end;
 end;
 
-function RPosEX(C: unicodechar; const S: UnicodeString; offs: cardinal): SizeInt;
+function RPosEx(C: unicodechar; const S: UnicodeString; offs: cardinal): SizeInt;
 
 var I   : SizeUInt;
     p,p2: PUnicodeChar;
@@ -3182,7 +3182,7 @@ begin
    end;
 end;
 
-function RPosex(const Substr: UnicodeString; const Source: UnicodeString; offs: cardinal): SizeInt;
+function RPosEx(const Substr: UnicodeString; const Source: UnicodeString; offs: cardinal): SizeInt;
 var
   MaxLen,llen : SizeInt;
   c : unicodechar;