Wed Mar 25 14:08:51 1998 Elena Zannoni <ezannoni@kwikemart.cygnus.com>

* gdbtk.c (gdbtk_pre_add_symbol): Use Tcl_merge to form Tcl commands.
This commit is contained in:
Elena Zannoni 1998-03-25 19:12:09 +00:00
parent b35711c4d8
commit e924e1625c
2 changed files with 10 additions and 3 deletions

View file

@ -1,3 +1,7 @@
Wed Mar 25 14:08:51 1998 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* gdbtk.c (gdbtk_pre_add_symbol): Use Tcl_merge to form Tcl commands.
Mon Mar 23 13:41:39 1998 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* gdbtk.c (gdb_get_mem): Rewrite to fetch entire contents

View file

@ -2946,10 +2946,13 @@ void
gdbtk_pre_add_symbol (name)
char *name;
{
char command[256];
char *merge, *v[2];
sprintf (command, "gdbtk_tcl_pre_add_symbol %s", name);
Tcl_Eval (interp, command);
v[0] = "gdbtk_tcl_pre_add_symbol";
v[1] = name;
merge = Tcl_Merge (2, v);
Tcl_Eval (interp, merge);
Tcl_Free (merge);
}
/* This hook is called whenever we finish loading a symbol file. */