diff options
author | Elena Zannoni <ezannoni@kwikemart.cygnus.com> | 1998-03-25 19:12:09 +0000 |
---|---|---|
committer | Elena Zannoni <ezannoni@kwikemart.cygnus.com> | 1998-03-25 19:12:09 +0000 |
commit | e924e1625cf71113b12531837289f974f6bc9015 (patch) | |
tree | fb190fd334e4d4c7ecbb5714d1cd9c41ceb06439 /gdb | |
parent | b35711c4d84befa3e743addb26163c42c5c17296 (diff) | |
download | gdb-e924e1625cf71113b12531837289f974f6bc9015.zip gdb-e924e1625cf71113b12531837289f974f6bc9015.tar.gz gdb-e924e1625cf71113b12531837289f974f6bc9015.tar.bz2 |
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.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/ChangeLog-gdbtk | 4 | ||||
-rw-r--r-- | gdb/gdbtk.c | 9 |
2 files changed, 10 insertions, 3 deletions
diff --git a/gdb/ChangeLog-gdbtk b/gdb/ChangeLog-gdbtk index 43ce8ef..d7afb60 100644 --- a/gdb/ChangeLog-gdbtk +++ b/gdb/ChangeLog-gdbtk @@ -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 diff --git a/gdb/gdbtk.c b/gdb/gdbtk.c index 561aff3..50d8a5c 100644 --- a/gdb/gdbtk.c +++ b/gdb/gdbtk.c @@ -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. */ |