* lib/targetdb.exp (board_info): Simplify return logic.

11 years ago · dc00d1723a
2 changed files with 6 additions and 10 deletions
--- a/4
+++ b/4
@ -1,3 +1,7 @@
+2016-02-20  Ben Elliston  <bje@gnu.org>
+
+	* lib/targetdb.exp (board_info): Simplify return logic.
+
 2016-02-19  Ben Elliston  <bje@gnu.org>

 	* configure.ac: Require Tcl version 8.5 at a minimum.
--- a/lib/targetdb.exp
+++ b/lib/targetdb.exp
@ -31,17 +31,9 @@ proc board_info { machine op args } {
    }
    if { $op == "exists" } {
 	if { [llength $args] == 0 } {
-	    if {[info exists board_info($machine,name)]} {
-		return 1
-	    } else {
-		return 0
-	    }
+	    return [info exists board_info($machine,name)]
 	} else {
-	    if {[info exists "board_info($machine,[lindex $args 0])"]} {
-		return 1
-	    } else {
-		return 0
-	    }
+	    return [info exists "board_info($machine,[lindex $args 0])"]
 	}
    }
    if { [llength $args] == 0 } {