Source position: tcl80.pp line 891
function Tcl_GlobalEval(
interp: PTcl_Interp;
command: PChar
):Integer;