diff options
Diffstat (limited to 'gdb')
| -rw-r--r-- | gdb/ChangeLog-gdbtk | 4 | ||||
| -rw-r--r-- | gdb/gdbtk.c | 7 |
2 files changed, 11 insertions, 0 deletions
diff --git a/gdb/ChangeLog-gdbtk b/gdb/ChangeLog-gdbtk index fbc69f6..5372df0 100644 --- a/gdb/ChangeLog-gdbtk +++ b/gdb/ChangeLog-gdbtk @@ -1,3 +1,7 @@ +Thu Jun 4 18:31:53 1998 Martin M. Hunt <hunt@cygnus.com> + + * gdbtk.c (gdbtk_init): Initialize tkTable. + Thu Jun 4 10:15:03 1998 Elena Zannoni <ezannoni@kwikemart.cygnus.com> * gdbtk.c: merged: diff --git a/gdb/gdbtk.c b/gdb/gdbtk.c index e99f339..21222fe 100644 --- a/gdb/gdbtk.c +++ b/gdb/gdbtk.c @@ -82,6 +82,8 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #undef SIOCSPGRP #endif +extern int Tktable_Init PARAMS ((Tcl_Interp *interp)); + static int No_Update = 0; static int load_in_progress = 0; static int in_fputs = 0; @@ -2244,6 +2246,11 @@ gdbtk_init ( argv0 ) if (Tix_Init(interp) != TCL_OK) error ("Tix_Init failed: %s", interp->result); + if (Tktable_Init(interp) != TCL_OK) + error ("Tktable_Init failed: %s", interp->result); + Tcl_StaticPackage(interp, "Tktable", Tktable_Init, + (Tcl_PackageInitProc *) NULL); + #ifdef __CYGWIN32__ if (ide_create_messagebox_command (interp) != TCL_OK) error ("messagebox command initialization failed"); |