summaryrefslogtreecommitdiff
path: root/src/jtag
diff options
context:
space:
mode:
authorzwelch <zwelch@b42882b7-edfa-0310-969c-e2dbd0fdcd60>2009-06-12 22:06:02 +0000
committerzwelch <zwelch@b42882b7-edfa-0310-969c-e2dbd0fdcd60>2009-06-12 22:06:02 +0000
commitcdd8f23b9b2ba4f78c4cb62b80321c20d4a29754 (patch)
tree845a843e418e1f5d09091a1479c730388491636a /src/jtag
parent7b65cb367f41d1095526fdcc3a4521fa3609063d (diff)
downloadopenocd+libswd-cdd8f23b9b2ba4f78c4cb62b80321c20d4a29754.tar.gz
openocd+libswd-cdd8f23b9b2ba4f78c4cb62b80321c20d4a29754.tar.bz2
openocd+libswd-cdd8f23b9b2ba4f78c4cb62b80321c20d4a29754.tar.xz
openocd+libswd-cdd8f23b9b2ba4f78c4cb62b80321c20d4a29754.zip
David Brownell <david-b@pacbell.net>:
Currently the "debug_level 3" command tracing ignores commands that could return values to TCL scripts (by plugging in to a slightly lower level of the interpreter stack). Fix that by abstracting the tracing command and starting to make some of those previously-untraced commands use this new mechanism. git-svn-id: svn://svn.berlios.de/openocd/trunk@2224 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src/jtag')
-rw-r--r--src/jtag/tcl.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/jtag/tcl.c b/src/jtag/tcl.c
index abc10062..3586a2f6 100644
--- a/src/jtag/tcl.c
+++ b/src/jtag/tcl.c
@@ -1248,6 +1248,8 @@ static int Jim_Command_drscan(Jim_Interp *interp, int argc, Jim_Obj *const *args
endstate = TAP_IDLE;
+ script_debug(interp, "drscan", argc, args);
+
/* validate arguments as numbers */
e = JIM_OK;
for (i = 2; i < argc; i+=2)
@@ -1369,6 +1371,8 @@ static int Jim_Command_pathmove(Jim_Interp *interp, int argc, Jim_Obj *const *ar
return JIM_ERR;
}
+ script_debug(interp, "pathmove", argc, args);
+
int i;
for (i=0; i<argc-1; i++)
{
@@ -1403,6 +1407,8 @@ static int Jim_Command_pathmove(Jim_Interp *interp, int argc, Jim_Obj *const *ar
static int Jim_Command_flush_count(Jim_Interp *interp, int argc, Jim_Obj *const *args)
{
+ script_debug(interp, "flush_count", argc, args);
+
Jim_SetResult(interp, Jim_NewIntObj(interp, jtag_get_flush_queue_count()));
return JIM_OK;