From e924e1625cf71113b12531837289f974f6bc9015 Mon Sep 17 00:00:00 2001 From: Elena Zannoni Date: Wed, 25 Mar 1998 19:12:09 +0000 Subject: Wed Mar 25 14:08:51 1998 Elena Zannoni * gdbtk.c (gdbtk_pre_add_symbol): Use Tcl_merge to form Tcl commands. --- gdb/gdbtk.c | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'gdb/gdbtk.c') 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. */ -- cgit v1.1