From mboxrd@z Thu Jan 1 00:00:00 1970 From: Wei Liu Subject: [PATCH OSSTEST 03/12] osstest migrate support check catch -> variables Date: Mon, 9 Feb 2015 11:09:57 +0000 Message-ID: <1423480206-9729-4-git-send-email-wei.liu2@citrix.com> References: <1423480206-9729-1-git-send-email-wei.liu2@citrix.com> Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Return-path: In-Reply-To: <1423480206-9729-1-git-send-email-wei.liu2@citrix.com> List-Unsubscribe: , List-Post: List-Help: List-Subscribe: , Sender: xen-devel-bounces@lists.xen.org Errors-To: xen-devel-bounces@lists.xen.org To: xen-devel@lists.xen.org Cc: jfehlig@suse.com, ian.jackson@eu.citrix.com, ian.campbell@citrix.com List-Id: xen-devel@lists.xenproject.org From: Ian Jackson Signed-off-by: Ian Jackson --- sg-run-job | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/sg-run-job b/sg-run-job index 2cf810a..cc2ab3b 100755 --- a/sg-run-job +++ b/sg-run-job @@ -289,7 +289,9 @@ proc run-job/test-pair {} { } proc test-guest-migr {g} { - if {[catch { run-ts . = ts-migrate-support-check + host $g }]} return + set to_reap [spawn-ts . = ts-migrate-support-check + host $g] + set can_migrate [reap-ts $to_reap] + if {!$can_migrate} return foreach iteration {{} .2} { run-ts . =$iteration ts-guest-saverestore + host $g -- 1.9.1