int newCommand (ClientData cd, Tcl_Interp *interp, int argc, char *argv[]);
Tcl_CreateCommand(interp, "new_command", newCommand, (ClientData) NULL, (Tcl_CmdDeleteProc *) NULL);