*#define ns__command0 "::command" static int tcl__command0_actual(ClientData clientdata, Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *CONST objv\[\]) { return TCL_OK; } static int tcl__command0(ClientData clientdata, Tcl_Interp *interp, Tcl_Size objc, Tcl_Obj *CONST objv\[\]) { int _rv; critcl_trace_cmd_args (ns__command0, objc, objv); _rv = tcl__command0_actual (clientdata, interp, objc, objv); return critcl_trace_cmd_result (_rv, interp); } * Fake_Init* *Tcl_CreateObjCommand2(interp, ns__command0, tcl__command0, NULL, NULL); *