Fix undefined local label test for COFF based ARM ports

gas/testsuite/ChangeLog

@@ -1,3 +1,11 @@
+2005-03-01  Nick Clifton  <nickc@redhat.com>
+
+	* gas/arm/arm.exp (undefined): Run a COFF variant of this test for
+	COFF based ports.
+	* gas/arm/undefined_coff.s: New file: Variant of undefined.s but
+	with a COFF formated local label name.
+	* gas/arm/undefined_coff.l: New file.  Variant of undefined.l.
+
 2005-03-01  Stig Petter Olsroed  <stigpo@users.sourceforge.net>
 	    Nick Clifton  <nickc@redhat.com>
 

gas/testsuite/gas/arm/arm.exp

@@ -56,13 +56,16 @@ if {[istarget *arm*-*-*] || [istarget "xscale-*-*"]} then {
     run_errors_test "req" "-mcpu=arm7m" ".req errors"
     run_errors_test "armv1-bad" "-mcpu=arm7m" "ARM v1 errors"
     run_errors_test "r15-bad" "" "Invalid use of r15 errors"
-    run_errors_test "undefined" "" "Undefined local label error"
 
     if {[istarget *-*-*elf*] || [istarget *-*-linux*] || [istarget *-*-*eabi]} then {
+        run_errors_test "undefined" "" "Undefined local label error"
 	run_dump_test "pic"
 	run_dump_test "mapping"
 	gas_test "bignum1.s" "" $stdoptlist "bignums"
 	run_dump_test "unwind"
+    } else {
+	# COFF based ports use a different naming convention for local labels.
+       run_errors_test "undefined_coff" "" "Undefined local label error"
     }
 
     if {! [istarget arm*-*-aout] && ![istarget arm-*-pe]} then {

gas/testsuite/gas/arm/undefined_coff.l

@@ -0,0 +1,2 @@
+[^:]*: Assembler messages:
+[^:]*:1: Error: undefined local label `Lval'

gas/testsuite/gas/arm/undefined_coff.s

@@ -0,0 +1 @@
+	ldr	a1, Lval