From 7b2906de246bc37af99d432b3edf12e9f5f63521 Mon Sep 17 00:00:00 2001 From: Zachary T Welch Date: Sun, 29 Nov 2009 18:27:45 -0800 Subject: do not extern 'interp' from command.c Adds 'interp' field to command_context, chasing the few remaining references to the global variable outside of the command module. --- src/server/tcl_server.c | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'src/server/tcl_server.c') 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; } -- cgit v1.2.3