Source position: GPCStrings.pas line 368
function PosCharInStr15(
theCh: Char;
const theStr: Str15
):Integer;