OpenCores
URL https://opencores.org/ocsvn/openmsp430/openmsp430/trunk

Subversion Repositories openmsp430

[/] [openmsp430/] [trunk/] [tools/] [bin/] [openmsp430-gdbproxy.tcl] - Diff between revs 210 and 214

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 210 Rev 214
Line 27... Line 27...
#
#
# Author(s):
# Author(s):
#             - Olivier Girard,    olgirard@gmail.com
#             - Olivier Girard,    olgirard@gmail.com
#
#
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
# $Rev: 210 $
# $Rev: 214 $
# $LastChangedBy: olivier.girard $
# $LastChangedBy: olivier.girard $
# $LastChangedDate: 2015-11-17 10:57:08 +0100 (Tue, 17 Nov 2015) $
# $LastChangedDate: 2016-03-12 21:15:33 +0100 (Sat, 12 Mar 2016) $
#------------------------------------------------------------------------------
#------------------------------------------------------------------------------
 
 
###############################################################################
###############################################################################
#                                                                             #
#                                                                             #
#                            SOURCE LIBRARIES                                 #
#                            SOURCE LIBRARIES                                 #
Line 628... Line 628...
button .tclscript.fb.read   -text "Source TCL script !" -state disabled -command {if {[file exists $tcl_file_name]} {source $tcl_file_name}}
button .tclscript.fb.read   -text "Source TCL script !" -state disabled -command {if {[file exists $tcl_file_name]} {source $tcl_file_name}}
pack   .tclscript.fb.read   -side left -padx 20  -pady {0 10} -fill x
pack   .tclscript.fb.read   -side left -padx 20  -pady {0 10} -fill x
 
 
wm resizable . 0 0
wm resizable . 0 0
 
 
 
# Close the window
 
wm protocol . WM_DELETE_WINDOW {
 
    if {[tk_messageBox -message "Quit?" -type yesno] eq "yes"} {
 
        stopAllServers
 
        utils::uart_close
 
        exit
 
    }
 
}
 
 
#####################################
#####################################
#  Breakpoint configuration window  #
#  Breakpoint configuration window  #
#####################################
#####################################
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.