Tcl_CmdInfo

type Tcl_CmdInfo = packed record

  isNativeObjectProc: Integer;

  objProc: TTclObjCmdProc;

  objClientData: Tcl_ClientData;

  proc: TTclCmdProc;

  clientData: Tcl_ClientData;

  deleteProc: TTclCmdDeleteProc;

  deleteData: Tcl_ClientData;

  namespacePtr: PTcl_Namespace;

end;