Source position: tcl80.pp line 785
function Tcl_CreateCommand(
interp: PTcl_Interp;
name: PAnsiChar;
cmdProc: TTclCmdProc;
clientData: Tcl_ClientData;
deleteProc: TTclCmdDeleteProc
):pTcl_Command;