diff options
Diffstat (limited to 'gdb/gdbtk/library/managedwin.ith')
-rw-r--r-- | gdb/gdbtk/library/managedwin.ith | 72 |
1 files changed, 0 insertions, 72 deletions
diff --git a/gdb/gdbtk/library/managedwin.ith b/gdb/gdbtk/library/managedwin.ith deleted file mode 100644 index 5bc9ab2f973..00000000000 --- a/gdb/gdbtk/library/managedwin.ith +++ /dev/null @@ -1,72 +0,0 @@ -# Managed window class definition for GDBtk. -# Copyright 1998, 1999, 2000, 2001 Red Hat, Inc. -# -# This program is free software; you can redistribute it and/or modify it -# under the terms of the GNU General Public License (GPL) as published by -# the Free Software Foundation; either version 2 of the License, or (at -# your option) any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. - - -itcl::class ManagedWin { - inherit itk::Widget - - public { - method constructor {args} - method destructor {} - - method reconfig {} {} - method destroy_toplevel {} - method quit_if_last {} {return 1} - method pickle {} - method reveal {} - method window_name {wname {iname ""}} - proc window_instance {ins} - - proc find {win} - proc open {class args} - proc open_dlg {class args} - proc init {} - proc restart {} - proc startup {} - proc shutdown {} - - common win_instance "" - } - - protected { - # The Tk's toplevel window for this ManagedWin - variable _top - - # Variable which holds the geometry of this window - variable _geometry {} - - # this is the counter of TopLevelWins open - # when it hits 0, exit. - common numTopWins 0 - - common _screenwidth - common _screenheight - - method _freeze_me {} - method _thaw_me {} - - # Should this window be reopened when we startup? - method _ignore_on_save {} { return 0 } - - # Should this window's size be remembered? - proc dont_remember_size {} { return 0 } - } - - private { - proc _create {class args} - proc _open {class args} - proc _make_icon_window {name {file "gdbtk_icon"}} - variable _wname {} - variable _iname {} - } -} |