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