philippelh/bitchx
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove unused variable tcl_ret in do_hook()

Browse Source 
Squashes a warning.
This commit is contained in:
Kevin Easton
2017-11-29 23:50:32 +11:00
parent b458082800
commit 0905cf9528
1 changed files with 13 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
source/hook.c
View File

@@ -821,11 +821,11 @@ static int show_list (int which)
int BX_do_hook (int which, char *format, ...) int BX_do_hook (int which, char *format, ...)
{ {
Hook *tmp = NULL, Hook *tmp = NULL;
*next = NULL, Hook *next = NULL;
**list; Hook **list;
char buffer [BIG_BUFFER_SIZE * 10 + 1], char buffer[BIG_BUFFER_SIZE * 10 + 1];
*name = NULL; char *name = NULL;
int retval = DONT_SUPPRESS_DEFAULT; int retval = DONT_SUPPRESS_DEFAULT;
unsigned display = window_display; unsigned display = window_display;
int i; int i;
@@ -834,9 +834,6 @@ int BX_do_hook (int which, char *format, ...)
char *result = NULL; char *result = NULL;
int old_debug_count = debug_count; int old_debug_count = debug_count;
#ifdef WANT_TCL
int tcl_ret = 0;
#endif
/* /*
* Figure out where the hooks are for the event type were asserting * Figure out where the hooks are for the event type were asserting
*/ */
@@ -895,7 +892,7 @@ int BX_do_hook (int which, char *format, ...)
#ifdef WANT_TCL #ifdef WANT_TCL
if (tcl_interp) if (tcl_interp)
tcl_ret = check_on_hook(which, format?buffer:NULL); check_on_hook(which, format?buffer:NULL);
#endif #endif
/* /*