Lines Matching defs:cmd
100 Tcl_Obj *cmd; /* cmd to eval at breakpoint */
120 b->cmd = 0;
147 if (b->cmd)
148 print(interp,"then {%s}",Tcl_GetString(b->cmd));
178 breakpoint_test(interp,cmd,bp)
180 char *cmd; /* command about to be executed */
188 cmdObj = Tcl_NewStringObj(cmd,-1);
198 if (0 == Tcl_StringMatch(cmd,
214 if (bp->cmd) {
215 Tcl_EvalObjEx(interp, bp->cmd, 0);
530 case none: return "cmd: none";
531 case step: return "cmd: step";
532 case next: return "cmd: next";
533 case ret: return "cmd: ret";
534 case cont: return "cmd: cont";
535 case up: return "cmd: up";
536 case down: return "cmd: down";
537 case where: return "cmd: where";
538 case Next: return "cmd: Next";
540 return "cmd: Unknown";
673 /* interactor won't return until user gives a debugger cmd */
799 if (b->cmd) Tcl_DecrRefCount(b->cmd);
1071 savestr(&b->cmd,Tcl_GetString (objv[i]));
1315 /* if user pressed return with no cmd, use previous one */