diff options
Diffstat (limited to 'gdb/gdbtk/library/srcwin.ith')
-rw-r--r-- | gdb/gdbtk/library/srcwin.ith | 106 |
1 files changed, 0 insertions, 106 deletions
diff --git a/gdb/gdbtk/library/srcwin.ith b/gdb/gdbtk/library/srcwin.ith deleted file mode 100644 index 65d2033fb2b..00000000000 --- a/gdb/gdbtk/library/srcwin.ith +++ /dev/null @@ -1,106 +0,0 @@ -# Source window class definition for GDBtk. -# Copyright 1997, 1998, 1999, 2000, 2001, 2002 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. - - -# ---------------------------------------------------------------------- -# Implements a source display widget using primitive widgets as the -# building blocks. -# -# The main display for SrcWin is a SrcTextWin widget. This file -# should contain all the code for controlling the SrcTextWin. -# SrcTextWin should just display the requested file and lines, without -# having to be very intelligent. If there are problems, error codes -# should be returned and SrcWin should figure out what to do. -# ---------------------------------------------------------------------- - -itcl::class SrcWin { - inherit TopLevelWin GDBWin - - public { - method constructor {args} - method destructor {} - method download_progress { section num tot {msg ""} } - method edit {} - method enable_ui { on } - method fillNameCB {} - method fillFuncCB {name} - method goto_func {w {val ""}} - method location {tag linespec} - method mode {w new_mode {go 1}} - method no_inferior {} - method print {} - method reconfig {} - method reset {} - method set_status { {msg ""} {tmp 0} } - method set_execution_status { {line ""} {pc ""}} - method stack {cmd} - method test_get {var {private_func 0}} - method toggle_updates {value} - method toolbar {state} - method inferior {action} - method clear_file {} - method get_file {} - method is_fixed {} - method search {direction string} - - proc choose_and_update {} - proc choose_and_display {tag linespec} - proc point_to_main {} - - # - # GDB Events - # - method busy {event} - method idle {event} - method update {event} - } - - private { - method _build_win {} - method _exit {} - method _name {w {val ""}} - method _set_name { val {found 1} } - method _set_state {varname} - method _update_title {name} - method _update {loc} - method get_top {} - method _set_tag_to_stack {} - proc _choose_window {file} - variable _statbar - variable _status - variable _toolbar - variable _statusframe - variable top - variable twin - variable current - variable need_files 0 - variable do_updates 1 ;# if the window does updates - variable _mangled_func - variable Tracing - variable saved_msg "" ;# static - - # statics used for downloads - variable last_section "" - variable last_section_start 0 - variable last_done 0 - - # These keep track of the current PC window and the list of all - # source windows. - common window_list "" - common pc_window "" - - # fenceposts - variable Running 0 - variable NoRun 0 - } -} |