Source position: GPCStrings.pas line 370
function PosCharInStr31(
theCh: Char;
const theStr: Str31
):Integer;