Source position: tcl80.pp line 889
function Tcl_VarEval(
interp: PTcl_Interp;
args: array of Const
):Integer;