diff options
| author | Martin Hunt <hunt@redhat.com> | 1998-06-05 01:29:10 +0000 |
|---|---|---|
| committer | Martin Hunt <hunt@redhat.com> | 1998-06-05 01:29:10 +0000 |
| commit | 94a6f14fa4b66a7f3d9b893b321a5f7751decc23 (patch) | |
| tree | 31dcaedeab0713f30563e9cefc92f513c311cdeb /gdb/gdbtk.c | |
| parent | ce56660d3a1e7e4fe127545784a886cb7204dd07 (diff) | |
| download | gdb-94a6f14fa4b66a7f3d9b893b321a5f7751decc23.zip gdb-94a6f14fa4b66a7f3d9b893b321a5f7751decc23.tar.gz gdb-94a6f14fa4b66a7f3d9b893b321a5f7751decc23.tar.bz2 | |
Thu Jun 4 18:31:53 1998 Martin M. Hunt <hunt@cygnus.com>
* gdbtk.c (gdbtk_init): Initialize tkTable.
Diffstat (limited to 'gdb/gdbtk.c')
| -rw-r--r-- | gdb/gdbtk.c | 7 |
1 files changed, 7 insertions, 0 deletions
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"); |