From bc349178ee3f7cae0a82a44328679f018797bf4b Mon Sep 17 00:00:00 2001
From: Mike Stump <mrs@apple.com>
Date: Fri, 4 Apr 2003 01:19:31 +0000
Subject: [PATCH] asm-fs-1.c: Expect failure on darwin.

	* gcc.dg/asm-fs-1.c: Expect failure on darwin.

	* lib/scanasm.exp (scan-assembler): Add xfail processing for
        target arg.
	(scan-assembler-times, scan-assembler-not): Likewise.
	(scan-assembler-dem, scan-assembler-dem-not): Likewise.

From-SVN: r65225
---
 gcc/testsuite/ChangeLog         |  9 +++++++++
 gcc/testsuite/gcc.dg/asm-fs-1.c |  4 ++--
 gcc/testsuite/lib/scanasm.exp   | 20 ++++++++++----------
 3 files changed, 21 insertions(+), 12 deletions(-)

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 78d35b84cfd..77ccfbd5959 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,12 @@
+2003-04-03  Mike Stump  <mrs@apple.com>
+
+	* gcc.dg/asm-fs-1.c: Expect failure on darwin.
+
+	* lib/scanasm.exp (scan-assembler): Add xfail processing for
+        target arg.
+	(scan-assembler-times, scan-assembler-not): Likewise.
+	(scan-assembler-dem, scan-assembler-dem-not): Likewise.
+
 2003-04-03  Eric Botcazou  <ebotcazou@libertysurf.fr>
 
 	* gcc.dg/sparc-loop-1.c: New test.
diff --git a/gcc/testsuite/gcc.dg/asm-fs-1.c b/gcc/testsuite/gcc.dg/asm-fs-1.c
index f215ee8ac8a..d0850356db1 100644
--- a/gcc/testsuite/gcc.dg/asm-fs-1.c
+++ b/gcc/testsuite/gcc.dg/asm-fs-1.c
@@ -10,5 +10,5 @@ void foo (void) {}
 extern int foobar asm ("_baz");
 int foobar = 3;
 
-/* { dg-final { scan-assembler-not "\\*_bar" } } */
-/* { dg-final { scan-assembler-not "\\*_baz" } } */
+/* { dg-final { scan-assembler-not "\\*_bar" { xfail *-*-darwin* } } } */
+/* { dg-final { scan-assembler-not "\\*_baz" { xfail *-*-darwin* } } } */
diff --git a/gcc/testsuite/lib/scanasm.exp b/gcc/testsuite/lib/scanasm.exp
index 774ec4a7ecd..133516d11cd 100644
--- a/gcc/testsuite/lib/scanasm.exp
+++ b/gcc/testsuite/lib/scanasm.exp
@@ -32,8 +32,8 @@ proc scan-assembler { args } {
 	switch [dg-process-target [lindex $args 1]] {
 	    "S" { }
 	    "N" { return }
-	    "F" { error "scan-assembler: `xfail' not allowed here" }
-	    "P" { error "scan-assembler: `xfail' not allowed here" }
+	    "F" { setup_xfail "*-*-*" }
+	    "P" { }
 	}
     }
 
@@ -70,8 +70,8 @@ proc scan-assembler-times { args } {
 	switch [dg-process-target [lindex $args 2]] {
 	    "S" { }
 	    "N" { return }
-	    "F" { error "scan-assembler: `xfail' not allowed here" }
-	    "P" { error "scan-assembler: `xfail' not allowed here" }
+	    "F" { setup_xfail "*-*-*" }
+	    "P" { }
 	}
     }
 
@@ -108,8 +108,8 @@ proc scan-assembler-not { args } {
 	switch [dg-process-target [lindex $args 1]] {
 	    "S" { }
 	    "N" { return }
-	    "F" { error "scan-assembler-not: `xfail' not allowed here" }
-	    "P" { error "scan-assembler-not: `xfail' not allowed here" }
+	    "F" { setup_xfail "*-*-*" }
+	    "P" { }
 	}
     }
 
@@ -145,8 +145,8 @@ proc scan-assembler-dem { args } {
 	switch [dg-process-target [lindex $args 1]] {
 	    "S" { }
 	    "N" { return }
-	    "F" { error "[lindex $args 0]: `xfail' not allowed here" }
-	    "P" { error "[lindex $args 0]: `xfail' not allowed here" }
+	    "F" { setup_xfail "*-*-*" }
+	    "P" { }
 	}
     }
 
@@ -191,8 +191,8 @@ proc scan-assembler-dem-not { args } {
 	switch [dg-process-target [lindex $args 1]] {
 	    "S" { }
 	    "N" { return }
-	    "F" { error "scan-assembler-dem-not: `xfail' not allowed here" }
-	    "P" { error "scan-assembler-dem-not: `xfail' not allowed here" }
+	    "F" { setup_xfail "*-*-*" }
+	    "P" { }
 	}
     }
 
-- 
2.30.2