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

+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.

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* } } } */

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" { }
 	}
     }