Source position: tcl80.pp line 892
function Tcl_RecordAndEval(
interp: PTcl_Interp;
cmd: PAnsiChar;
flags: Integer
):Integer;