From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gdb-patches-return-36815-listarch-gdb-patches=sources.redhat.com@sources.redhat.com>
Received: (qmail 1312 invoked by alias); 10 Nov 2004 14:03:23 -0000
Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:gdb-patches-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/gdb-patches/>
List-Post: <mailto:gdb-patches@sources.redhat.com>
List-Help: <mailto:gdb-patches-help@sources.redhat.com>, <http://sources.redhat.com/ml/#faqs>
Sender: gdb-patches-owner@sources.redhat.com
Received: (qmail 1249 invoked from network); 10 Nov 2004 14:03:13 -0000
Received: from unknown (HELO mx1.redhat.com) (66.187.233.31)
  by sourceware.org with SMTP; 10 Nov 2004 14:03:13 -0000
Received: from int-mx1.corp.redhat.com (int-mx1.corp.redhat.com [172.16.52.254])
	by mx1.redhat.com (8.12.11/8.12.11) with ESMTP id iAAE30MR027257
	for <gdb-patches@sources.redhat.com>; Wed, 10 Nov 2004 09:03:00 -0500
Received: from localhost.redhat.com (to-dhcp51.toronto.redhat.com [172.16.14.151])
	by int-mx1.corp.redhat.com (8.11.6/8.11.6) with ESMTP id iAAE30r22978;
	Wed, 10 Nov 2004 09:03:00 -0500
Received: from [127.0.0.1] (localhost.localdomain [127.0.0.1])
	by localhost.redhat.com (Postfix) with ESMTP id 64518129D8C;
	Wed, 10 Nov 2004 09:01:59 -0500 (EST)
Message-ID: <41921F54.7040308@gnu.org>
Date: Wed, 10 Nov 2004 14:03:00 -0000
From: Andrew Cagney <cagney@gnu.org>
User-Agent: Mozilla Thunderbird 0.8 (X11/20041020)
MIME-Version: 1.0
To: Hans-Peter Nilsson <hans-peter.nilsson@axis.com>
Cc: gdb-patches@sources.redhat.com
Subject: Re: [RFA:] sim-defs.exp: support xfail
References: <200411100952.iAA9q7Ys002024@ignucius.se.axis.com>
In-Reply-To: <200411100952.iAA9q7Ys002024@ignucius.se.axis.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
X-SW-Source: 2004-11/txt/msg00189.txt.bz2

Hans-Peter Nilsson wrote:
> Directly taken from the same option in the ld run_dump_test.
> 
> Ok to commit?
> 
> 2004-11-10  Hans-Peter Nilsson  <hp@axis.com>
> 
> 	* lib/sim-defs.exp (run_sim_test): Support "xfail" option.

What do you mean by "xfail"? (Hint, check a current dejagnu document 
where it describes kfail :-)

Andrew

> Index: sim-defs.exp
> ===================================================================
> RCS file: /cvs/src/src/sim/testsuite/lib/sim-defs.exp,v
> retrieving revision 1.8
> diff -c -p -r1.8 sim-defs.exp
> *** sim-defs.exp	26 Oct 2004 08:07:59 -0000	1.8
> --- sim-defs.exp	10 Nov 2004 09:49:44 -0000
> *************** proc sim_run { prog sim_opts prog_opts r
> *** 163,168 ****
> --- 163,169 ----
>   # sim[(mach-list)]: <simulator options>
>   # output: program output pattern to match with string-match
>   # xerror: program is expected to return with a "failure" exit code
> + # xfail: <target-triple-where-test-fails>
>   # If `output' is not specified, the program must output "pass" if !xerror or
>   # "fail" if xerror.
>   # The parens in "optname()" are optional if the specification is for all machs.
> *************** proc run_sim_test { name requested_machs
> *** 196,201 ****
> --- 197,203 ----
>       set opts(mach) ""
>       set opts(timeout) ""
>       set opts(xerror) "no"
> +     set opts(xfail) ""
>   
>       if ![info exists global_as_options] {
>           set global_as_options ""
> *************** proc run_sim_test { name requested_machs
> *** 262,267 ****
> --- 268,278 ----
>   
>   	verbose -log "Testing $name on machine $mach."
>   
> + 	# Time to setup xfailures.
> + 	foreach targ $opts(xfail) {
> + 	    setup_xfail $targ
> + 	}
> + 
>   	if ![info exists opts(as,$mach)] {
>   	    set opts(as,$mach) $opts(as)
>   	}
> 
> brgds, H-P
>