aboutsummaryrefslogtreecommitdiff
path: root/lib/targetdb.exp
diff options
context:
space:
mode:
Diffstat (limited to 'lib/targetdb.exp')
-rw-r--r--lib/targetdb.exp16
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/targetdb.exp b/lib/targetdb.exp
index 3a72434..255be75 100644
--- a/lib/targetdb.exp
+++ b/lib/targetdb.exp
@@ -26,18 +26,18 @@ proc board_info { machine op args } {
verbose "board_info $machine $op $args" 3
- if [info exists target_info($machine,name)] {
+ if {[info exists target_info($machine,name)]} {
set machine $target_info($machine,name)
}
if { $op == "exists" } {
if { [llength $args] == 0 } {
- if [info exists board_info($machine,name)] {
+ if {[info exists board_info($machine,name)]} {
return 1
} else {
return 0
}
} else {
- if [info exists "board_info($machine,[lindex $args 0])"] {
+ if {[info exists "board_info($machine,[lindex $args 0])"]} {
return 1
} else {
return 0
@@ -46,7 +46,7 @@ proc board_info { machine op args } {
}
if { [llength $args] == 0 } {
verbose "getting $machine $op" 3
- if [info exists board_info($machine,$op)] {
+ if {[info exists board_info($machine,$op)]} {
return $board_info($machine,$op)
} else {
return ""
@@ -68,7 +68,7 @@ proc host_info { op args } {
proc set_board_info { entry value } {
global board_info board
- if ![info exists board_info($board,$entry)] {
+ if {![info exists board_info($board,$entry)]} {
set board_info($board,$entry) $value
}
}
@@ -80,7 +80,7 @@ proc set_currtarget_info { entry value } {
set board [target_info name]
- if ![info exists board_info($board,$entry)] {
+ if {![info exists board_info($board,$entry)]} {
set board_info($board,$entry) $value
}
}
@@ -90,7 +90,7 @@ proc set_currtarget_info { entry value } {
proc unset_board_info { entry } {
global board_info board
- if [info exists board_info($board,$entry)] {
+ if {[info exists board_info($board,$entry)]} {
unset board_info($board,$entry)
}
}
@@ -102,7 +102,7 @@ proc unset_currtarget_info { entry } {
set board [target_info name]
- if [info exists board_info($board,$entry)] {
+ if {[info exists board_info($board,$entry)]} {
unset board_info($board,$entry)
}
}