| Line 26... |
Line 26... |
#
|
#
|
# Author(s):
|
# Author(s):
|
# - Olivier Girard, olgirard@gmail.com
|
# - Olivier Girard, olgirard@gmail.com
|
#
|
#
|
#-----------------------------------------------------------------------------------------------------------
|
#-----------------------------------------------------------------------------------------------------------
|
# $Rev: 159 $
|
# $Rev: 172 $
|
# $LastChangedBy: olivier.girard $
|
# $LastChangedBy: olivier.girard $
|
# $LastChangedDate: 2012-10-15 23:51:22 +0200 (Mon, 15 Oct 2012) $
|
# $LastChangedDate: 2012-12-28 00:06:56 +0100 (Fri, 28 Dec 2012) $
|
#-----------------------------------------------------------------------------------------------------------
|
#-----------------------------------------------------------------------------------------------------------
|
#
|
#
|
# Description: Main utility functions for the openMSP430 serial debug
|
# Description: Main utility functions for the openMSP430 serial debug
|
# interface.
|
# interface.
|
#
|
#
|
| Line 1043... |
Line 1043... |
# Copy global variable to local for code readability
|
# Copy global variable to local for code readability
|
set if $omsp_conf(interface)
|
set if $omsp_conf(interface)
|
set cpuaddr $omsp_conf($CpuNr,cpuaddr)
|
set cpuaddr $omsp_conf($CpuNr,cpuaddr)
|
|
|
# Compute the BRKx_CTL corresponding value
|
# Compute the BRKx_CTL corresponding value
|
set brk_ctl_ref [format "0x02%x" [expr 8*$Type+4+2*$Wr+$Rd]]
|
set brk_ctl_ref [format "0x%02x" [expr 8*$Type+4+2*$Wr+$Rd]]
|
|
|
# First look for utilized units with correct BRKx_CTL attributes
|
# First look for utilized units with correct BRKx_CTL attributes
|
for {set i 0} {$i<$omsp_info($CpuNr,hw_break)} {incr i} {
|
for {set i 0} {$i<$omsp_info($CpuNr,hw_break)} {incr i} {
|
if {[string eq [${if}::dbg_rd $cpuaddr "BRK$i\_CTL"] $brk_ctl_ref]} {
|
if {[string eq [${if}::dbg_rd $cpuaddr "BRK$i\_CTL"] $brk_ctl_ref]} {
|
|
|
