summaryrefslogtreecommitdiff
path: root/src/server/tcl_server.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/tcl_server.c')
-rw-r--r--src/server/tcl_server.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/server/tcl_server.c b/src/server/tcl_server.c
index 22469a4f..08247686 100644
--- a/src/server/tcl_server.c
+++ b/src/server/tcl_server.c
@@ -81,6 +81,7 @@ static int tcl_new_connection(struct connection *connection)
static int tcl_input(struct connection *connection)
{
+ Jim_Interp *interp = (Jim_Interp *)connection->priv;
int retval;
int i;
ssize_t rlen;
@@ -156,7 +157,7 @@ static int tcl_closed(struct connection *connection)
return ERROR_OK;
}
-int tcl_init(void)
+int tcl_init(struct command_context *cmd_ctx)
{
int retval;
@@ -166,7 +167,9 @@ int tcl_init(void)
return ERROR_OK;
}
- retval = add_service("tcl", CONNECTION_TCP, tcl_port, 1, tcl_new_connection, tcl_input, tcl_closed, NULL);
+ retval = add_service("tcl", CONNECTION_TCP, tcl_port, 1,
+ &tcl_new_connection, &tcl_input,
+ &tcl_closed, cmd_ctx->interp);
return retval;
}