From mboxrd@z Thu Jan  1 00:00:00 1970
From: hjl@lucon.org (H.J. Lu)
To: schmid@ltoi.iap.physik.tu-darmstadt.de (Peter Schmid)
Cc: egcs@cygnus.com
Subject: A patch for gcc/testsuite
Date: Wed, 04 Feb 1998 12:28:00 -0000
Message-id: <m0y0BQK-0004eeC@ocean.lucon.org>
References: <Pine.A32.3.95.980204173803.15158A-100000@ltoi.iap.physik.tu-darmstadt.de>
X-SW-Source: 1998-02/msg00163.html

> 
> 
> These are the testsuite results for egcs-2.91.06-cvs on the
> i386-pc-linux-gnulibc1 system.
> I updated the cvs sources at Feb  4 12:06:02 1998.
> 
> Peter Schmid
> 
> g++:
> 
> XPASS: g++.mike/p6610a.C - Execution test

What is PATTERN in process-option used for? It is kind of bogus
to me. Even if I have

// execution test fails - XFAIL *-*-linux-gnu *-*-linux

in g++.old-deja/g++.mike/p6610a.C, dejagnu still sets execbug_flag
for i586-unknown-linux-gnulibc1 since process will always return
a non-empty string if XFAIL is found. Does this patch make any senses?

Thanks.

H.J.
----
Wed Feb  4 07:19:22 1998  H.J. Lu  (hjl@gnu.org)

	* lib/old-dejagnu.exp (process-option): Append result only if
	$triplet_match is not 0.

--- lib/old-dejagnu.exp.orig	Wed Feb  4 11:41:34 1998
+++ lib/old-dejagnu.exp	Wed Feb  4 12:13:18 1998
@@ -79,10 +79,12 @@
 		}
 	    }
 	    set compos [expr [llength $option] + 1] ;# Start of comment, if any
-	    if { $xfail_test && $triplet_match } then {
-		lappend result [list [lindex $i 0] "X$flag_name" [lrange $i $compos end] "$pattern"]
-	    } else {
-		lappend result [list [lindex $i 0] "$flag_name" [lrange $i $compos end] "$pattern"]
+	    if { $triplet_match } then {
+		if { $xfail_test } then {
+		    lappend result [list [lindex $i 0] "X$flag_name" [lrange $i $compos end] "$pattern"]
+		} else {
+		    lappend result [list [lindex $i 0] "$flag_name" [lrange $i $compos end] "$pattern"]
+		}
 	    }
 	    if { $verbose > 1 } then {
 		if [string match "" [lrange $i $compos end]] then {