URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [trunk/] [insight/] [gdb/] [gdbtcl/] [targetselection.ith] - Rev 1767
Go to most recent revision | Compare with Previous | Blame | View Log
# Target selection dialog class definition for GDBtk.
# Copyright 1997, 1998, 1999 Cygnus Solutions
#
# 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.
class TargetSelection {
inherit ModalDialog ManagedWin
private {
variable f
variable fr
variable target
variable saved_baud
variable saved_port
variable saved_main
variable saved_exit
variable saved_check
variable saved_verb
variable saved_portname
variable saved_hostname
variable saved_attach
variable saved_load
variable saved_run
variable saved_cont
variable saved_options
variable saved_after_attaching
variable _after_entry
variable changes 0
variable target_list ""
common db_inited 0
common prefs_inited 0
common trace_inited 0
# The Connection frame has three "sections"; the first contains
# a combobox with all the targets. The second can either be
# a combobox listing available baud rates or an entry for specifying
# the hostname of a TCP connection. The actual widget mapped onto the
# screen is saved in MAPPED1. The third section contains either a
# combobox for the serial port or an entry for the portnumber. The
# widget actually mapped onto the screen is saved in MAPPED2.
variable mapped1
variable mapped2
variable Width 20
variable MoreButton
variable MoreFrame
variable MoreLabel
variable RunMethod
proc _init_prefs {}
proc default_port {}
method build_win {}
method cancel {}
method change_baud {w {baud ""}}
method change_target {w {name ""}}
method config_dialog {t}
method fill_rates {}
method fill_targets {}
method get_target {name}
method help {}
method _init {}
method _init_target {}
method port_list {}
method save {}
method set_check_button {name}
method set_run {check_which}
method set_saved {}
method target_trace {variable index op}
method toggle_more_options {}
method valid_target {target}
method write_saved {}
}
public {
variable exportcancel 0
method constructor {args}
method reconfig {}
proc get_target_list {}
proc native_debugging {}
proc getname {target name}
proc init_target_db {}
}
protected common gdb_target
}
Go to most recent revision | Compare with Previous | Blame | View Log