Source position: tcl80.pp line 868
function Tcl_GetCommandInfo(
interp: PTcl_Interp;
cmdName: PAnsiChar;
var info: Tcl_CmdInfo
):Integer;