Source position: compproc.inc line 102
function fpc_Val_qword_AnsiStr(
const S: AnsiString;
var Code: ValSInt
):qword;