Source position: GPCStrings.pas line 369
function PosCharInStr27(
theCh: Char;
const theStr: Str27
):Integer;