extern void gdbtk_delete_tracepoint (int);
extern void gdbtk_modify_tracepoint (int);
-extern void (*pre_add_symbol_hook) (char *);
+extern void (*pre_add_symbol_hook) (const char *);
extern void (*post_add_symbol_hook) (void);
extern void (*selected_frame_level_changed_hook) (int);
extern int (*ui_loop_hook) (int);
trace_start_stop_hook = gdbtk_trace_start_stop;
attach_hook = gdbtk_attach;
- detach_hook = gdbtk_detach;
+ detach_hook = gdbtk_detach;
register_changed_hook = gdbtk_register_changed;
memory_changed_hook = gdbtk_memory_changed;
{
if (gdbtk_disable_fputs)
return;
-
+
in_fputs = 1;
if (stream == gdb_stdlog)
xasprintf (&buf, "gdbtk_tcl_ignorable_warning {%s} {%s}", class, warning);
if (Tcl_Eval (gdbtk_interp, buf) != TCL_OK)
report_error ();
- free(buf);
+ free(buf);
}
static void
report_error ();
Tcl_DStringFree (&cmd);
-
+
if (buffer != NULL)
{
free(buffer);
xasprintf (&buf, "Download::download_hash %s %ld", section, num);
if (Tcl_Eval (gdbtk_interp, buf) != TCL_OK)
report_error ();
- free(buf);
-
+ free(buf);
+
return atoi (gdbtk_interp->result);
}
/* This hook is called whenever we are ready to load a symbol file so that
the UI can notify the user... */
static void
-gdbtk_pre_add_symbol (char *name)
+gdbtk_pre_add_symbol (const char *name)
{
gdbtk_two_elem_cmd ("gdbtk_tcl_pre_add_symbol", name);
}
* This handles all queries from gdb.
* The first argument is a printf style format statement, the rest are its
* arguments. The resultant formatted string is passed to the Tcl function
- * "gdbtk_tcl_query".
+ * "gdbtk_tcl_query".
* It returns the users response to the query, as well as putting the value
* in the result field of the Tcl interpreter.
*/
target_signal_to_string (stop_signal));
if (Tcl_Eval (gdbtk_interp, buf) != TCL_OK)
report_error ();
- free(buf);
+ free(buf);
}
static void