From 2b673d0c1e190f76b1bd2c5a7f7f1242bd1c3d18 Mon Sep 17 00:00:00 2001 From: oharboe Date: Sun, 6 Jul 2008 19:33:05 +0000 Subject: Charles Hardin - Tcl Server git-svn-id: svn://svn.berlios.de/openocd/trunk@757 b42882b7-edfa-0310-969c-e2dbd0fdcd60 --- src/openocd.c | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/openocd.c') diff --git a/src/openocd.c b/src/openocd.c index b6b217df..5439ece0 100644 --- a/src/openocd.c +++ b/src/openocd.c @@ -143,6 +143,7 @@ int handle_init_command(struct command_context_s *cmd_ctx, char *cmd, char **arg /* initialize telnet subsystem */ telnet_init("Open On-Chip Debugger"); gdb_init(); + tcl_init(); /* allows tcl to just connect without going thru telnet */ return ERROR_OK; } @@ -641,6 +642,7 @@ int main(int argc, char *argv[]) server_register_commands(cmd_ctx); telnet_register_commands(cmd_ctx); gdb_register_commands(cmd_ctx); + tcl_register_commands(cmd_ctx); /* tcl server commands */ log_register_commands(cmd_ctx); jtag_register_commands(cmd_ctx); interpreter_register_commands(cmd_ctx); -- cgit v1.2.3