X-Git-Url: https://review.openocd.org/gitweb?p=openocd.git;a=blobdiff_plain;f=src%2Fserver%2Ftcl_server.c;h=b5bdbc28935f2fb74b5da7632ed8e2783eaa9865;hp=3410ca91ef235a0ff9089092cdcfec0405cc197e;hb=f2cbaba3cc4af99db7b4f2682c2e0dd4467655e3;hpb=cfc4d5c6b7b6f8f82dc5bbf3ee661c179814666e

diff --git a/src/server/tcl_server.c b/src/server/tcl_server.c
index 3410ca91ef..b5bdbc2893 100644
--- a/src/server/tcl_server.c
+++ b/src/server/tcl_server.c
@@ -27,12 +27,12 @@
 #define TCL_SERVER_VERSION	"TCL Server 0.1"
 #define TCL_MAX_LINE		(4096)
 
-typedef struct tcl_connection_s {
+struct tcl_connection {
 	int tc_linedrop;
 	int tc_lineoffset;
 	char tc_line[TCL_MAX_LINE];
 	int tc_outerror; /* flag an output error */
-} tcl_connection_t;
+};
 
 static unsigned short tcl_port = 6666;
 
@@ -50,7 +50,7 @@ static int tcl_closed(connection_t *connection);
 int tcl_output(connection_t *connection, const void *data, ssize_t len)
 {
 	ssize_t wlen;
-	tcl_connection_t *tclc;
+	struct tcl_connection *tclc;
 
 	tclc = connection->priv;
 	if (tclc->tc_outerror)
@@ -68,13 +68,13 @@ int tcl_output(connection_t *connection, const void *data, ssize_t len)
 /* connections */
 static int tcl_new_connection(connection_t *connection)
 {
-	tcl_connection_t *tclc;
+	struct tcl_connection *tclc;
 
-	tclc = malloc(sizeof(tcl_connection_t));
+	tclc = malloc(sizeof(struct tcl_connection));
 	if (tclc == NULL)
 		return ERROR_CONNECTION_REJECTED;
 
-	memset(tclc, 0, sizeof(tcl_connection_t));
+	memset(tclc, 0, sizeof(struct tcl_connection));
 	connection->priv = tclc;
 	return ERROR_OK;
 }
@@ -86,7 +86,7 @@ static int tcl_input(connection_t *connection)
 	ssize_t rlen;
 	const char *result;
 	int reslen;
-	tcl_connection_t *tclc;
+	struct tcl_connection *tclc;
 	char in[256];
 
 	rlen = read_socket(connection->fd, &in, sizeof(in));
@@ -172,7 +172,7 @@ int tcl_init(void)
 
 COMMAND_HANDLER(handle_tcl_port_command)
 {
-	return server_port_command(cmd_ctx, cmd, args, argc, &tcl_port);
+	return CALL_COMMAND_HANDLER(server_port_command, &tcl_port);
 }
 
 int tcl_register_commands(command_context_t *cmd_ctx)