From 6956527849370062f059a2e63f30936595b48825 Mon Sep 17 00:00:00 2001 From: oharboe Date: Sun, 13 Jul 2008 08:25:33 +0000 Subject: [PATCH] Duane Ellis fix to tcl puts git-svn-id: svn://svn.berlios.de/openocd/trunk@802 b42882b7-edfa-0310-969c-e2dbd0fdcd60 --- src/openocd.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/openocd.c b/src/openocd.c index dcaca784..6c1f5703 100644 --- a/src/openocd.c +++ b/src/openocd.c @@ -499,7 +499,10 @@ static void tcl_output(void *privData, const char *file, int line, const char *f int jim_command(command_context_t *context, char *line) { int retval=ERROR_OK; - int retcode=Jim_Eval(interp, line); + int retcode; + + active_cmd_ctx = context; + retcode = Jim_Eval(interp, line); if (retcode == JIM_ERR) { Jim_PrintErrorMessage(interp); -- 2.39.5