From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 8798 invoked by alias); 10 Nov 2004 09:52:15 -0000 Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sources.redhat.com Received: (qmail 8749 invoked from network); 10 Nov 2004 09:52:08 -0000 Received: from unknown (HELO krynn.se.axis.com) (212.209.10.221) by sourceware.org with SMTP; 10 Nov 2004 09:52:08 -0000 Received: from ignucius.se.axis.com (ignucius.se.axis.com [10.83.5.18]) by krynn.se.axis.com (8.12.9/8.12.9/Debian-5local0.1) with ESMTP id iAA9q7AD009951; Wed, 10 Nov 2004 10:52:07 +0100 Received: from ignucius.se.axis.com (localhost [127.0.0.1]) by ignucius.se.axis.com (8.12.8p1/8.12.8/Debian-2woody1) with ESMTP id iAA9q7dD002028; Wed, 10 Nov 2004 10:52:07 +0100 Received: (from hp@localhost) by ignucius.se.axis.com (8.12.8p1/8.12.8/Debian-2woody1) id iAA9q7Ys002024; Wed, 10 Nov 2004 10:52:07 +0100 Date: Wed, 10 Nov 2004 09:52:00 -0000 Message-Id: <200411100952.iAA9q7Ys002024@ignucius.se.axis.com> From: Hans-Peter Nilsson To: gdb-patches@sources.redhat.com Subject: [RFA:] sim-defs.exp: support xfail X-SW-Source: 2004-11/txt/msg00187.txt.bz2 Directly taken from the same option in the ld run_dump_test. Ok to commit? 2004-11-10 Hans-Peter Nilsson * lib/sim-defs.exp (run_sim_test): Support "xfail" option. 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)]: # output: program output pattern to match with string-match # xerror: program is expected to return with a "failure" exit code + # xfail: # 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