From: Ben Elliston <bje@gnu.org>
Date: Sat, 20 Feb 2016 00:23:09 +0000 (+1100)
Subject: 	* lib/targetdb.exp (board_info): Simplify return logic.
X-Git-Tag: upstream/1.6.2~163
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=dc00d1723a2ee181dc93fe0ce6f1320c226d83fc;p=platform%2Fupstream%2Fdejagnu.git

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

diff --git a/ChangeLog b/ChangeLog
index f4277c9..9f8adb0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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.
diff --git a/lib/targetdb.exp b/lib/targetdb.exp
index 6e4ec3c..e29886e 100644
--- 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 } {