From f0f5157e0952e5ffeccd681b9617b3a80c388c53 Mon Sep 17 00:00:00 2001 From: oharboe Date: Tue, 8 Jul 2008 16:05:59 +0000 Subject: tcl regression fixes. git-svn-id: svn://svn.berlios.de/openocd/trunk@774 b42882b7-edfa-0310-969c-e2dbd0fdcd60 --- src/target/target.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/target/target.c') diff --git a/src/target/target.c b/src/target/target.c index 9843ad07..082b5cb5 100644 --- a/src/target/target.c +++ b/src/target/target.c @@ -1494,7 +1494,7 @@ int handle_target_script_command(struct command_context_s *cmd_ctx, char *cmd, c /* Define a tcl procedure which we'll invoke upon some event */ command_run_linef(cmd_ctx, "proc target_%s_%d {} {" - "openocd {script %s}" + "openocd {script %s} ; return \"\"" "}", event, get_num_by_target(target), -- cgit v1.2.3