Duplicate hppa*-*-*elf* behaviour for hppa*-*-linux*.

Fix elf tests for targets that define LABELS_WITHOUT_COLONS.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index c4fdafd64b7bf0734beb1358bb66049ddf7fb8e3..4e0d60b66161655c39707e3e1874ea1fb94f8f0d 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,20 @@
+2000-05-02  Alan Modra  <alan@linuxcare.com.au>
+
+       * gas/hppa/unsorted/unsorted.exp: Duplicate hppa*-*-*elf*
+       behaviour for hppa*-*-linux* throughout file.
+       * gas/hppa/reloc/reloc.exp: Ditto.
+       (reduce2.s): Disable test for elf targets.
+
+       * gas/hppa/parse/parse.exp (ssbug.s): setup_xfail hppa*-*-linux*.
+
+       * gas/elf/section0.s: Don't start pseudos on first column so
+       targets that define LABELS_WITHOUT_COLONS work.
+       * gas/elf/section1.s: Ditto.
+       * gas/vtable/inherit0.s: Ditto.
+       * gas/vtable/inherit1.s: Ditto.
+       * gas/vtable/entry0.s: Ditto.
+       * gas/vtable/entry1.s: Ditto.
+
 2000-05-01  Nick Clifton  <nickc@cygnus.com>
 
        * gasp/macro.out: Fix label numbers to remove leading zeroes. 

diff --git a/gas/testsuite/gas/elf/section0.s b/gas/testsuite/gas/elf/section0.s
index bdc8f0c7526279bbfd354bfe26fd5301217336f0..022fbfeb81dc9246bb7f3fc3eda327ae43fbb10d 100644 (file)
--- a/gas/testsuite/gas/elf/section0.s
+++ b/gas/testsuite/gas/elf/section0.s
@@ -1,16 +1,16 @@
-.data
+ .data
        .byte 0
-.section A
+ .section A
        .byte 1
-.pushsection B
+ .pushsection B
        .byte 2
-.pushsection C
+ .pushsection C
        .byte 3
-.popsection
+ .popsection
        .byte 2
-.popsection
+ .popsection
        .byte 1
-.previous
+ .previous
        .byte 0
-.previous
+ .previous
        .byte 1

diff --git a/gas/testsuite/gas/elf/section1.s b/gas/testsuite/gas/elf/section1.s
index 1592adffb7d0da0b6d3d1b6bf934236dbd998b72..667e09c66b3881d02662766dd6ec27187e8e1651 100644 (file)
--- a/gas/testsuite/gas/elf/section1.s
+++ b/gas/testsuite/gas/elf/section1.s
@@ -1,32 +1,32 @@
-.data
+ .data
        .byte 0
-.section A
+ .section A
        .byte 1
-.previous
+ .previous
        .byte 0
-.previous
+ .previous
        .byte 1
-.pushsection B
+ .pushsection B
        .byte 2
-.previous
+ .previous
        .byte 1
-.previous
+ .previous
        .byte 2
-.pushsection C
+ .pushsection C
        .byte 3
-.previous
+ .previous
        .byte 2
-.previous
+ .previous
        .byte 3
-.popsection
+ .popsection
        .byte 2
-.previous
+ .previous
        .byte 1
-.previous
+ .previous
        .byte 2
-.popsection
+ .popsection
        .byte 1
-.previous
+ .previous
        .byte 0
-.previous
+ .previous
        .byte 1

diff --git a/gas/testsuite/gas/hppa/parse/parse.exp b/gas/testsuite/gas/hppa/parse/parse.exp
index 44d674e5332775c1cb2fd436e4654b2fdc8345fc..e089d2aa21a3ef65f84190c9c05e626082b893c4 100644 (file)
--- a/gas/testsuite/gas/hppa/parse/parse.exp
+++ b/gas/testsuite/gas/hppa/parse/parse.exp
@@ -188,8 +188,7 @@ if [istarget hppa*-*-*] then {
 
     # Bad things happen in the PA ELF backend (others too?) if a non-default
     # section is created...
-    setup_xfail hppa*-*-*elf*
-    setup_xfail hppa*w-*-*
+    setup_xfail "hppa*-*-*elf*" "hppa*-*-linux*" "hppa*w-*-*"
     gas_test "ssbug.s" "" "" "Check for acceptance of non-default subspaces"
 
     # To be compatable with certain "features" of the HP compiler

diff --git a/gas/testsuite/gas/hppa/reloc/reloc.exp b/gas/testsuite/gas/hppa/reloc/reloc.exp
index aa81bdd99eadcef04f2f8a36e564bbc43c678632..159cc6ca70a890571fb977500d139142a6eed6f5 100644 (file)
--- a/gas/testsuite/gas/hppa/reloc/reloc.exp
+++ b/gas/testsuite/gas/hppa/reloc/reloc.exp
@@ -98,6 +98,8 @@ proc do_relocation_reduction_tests {} {
     set testname "reduce2.s: More relocation reduction tests (part 2)"
     set x 0
 
+    if {![istarget hppa*-*-*elf*] && ![istarget hppa*-*-linux*]} then {
+
     if [gas_test_old "reduce2.s" "" "More relocation  reductions (part1)"] then {
        objdump_start_no_subdir "a.out" "-r"
 
@@ -126,6 +128,7 @@ proc do_relocation_reduction_tests {} {
 
     # Did we find what we were looking for?  If not, flunk it.
     if [expr $x==2] then { pass $testname } else { fail $testname }
+    }
 
     set testname "reduce3.s: Test even more relocation reductions (part 2)"
     set x 0
@@ -252,7 +255,7 @@ proc do_selector_scope_test {} {
        # Check to make sure the relocation entry after the plabel is correct.
        # If an old field selector was incorrectly "carried" over, then 
        # this test will fail.
-        if [istarget hppa*-*-*elf*] then {
+        if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
            while 1 {
                expect {
                    -re "^0+14\[^\n\]*DIR32\[^\n\]*\n"
@@ -324,7 +327,7 @@ proc do_exit_relocation_test {} {
     # Elf (osf) does not use ENTRY/EXIT relocations.
     # I guess we could look at the unwind subspaces it builds...
     # Until then, make sure it still assembles.
-    if [istarget hppa*-*-*elf*] then {
+    if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
        gas_test_old "exitbug.s" "" "Test for bogus R_EXIT relocation (part 1)"
        return;
     }
@@ -361,7 +364,7 @@ proc do_cross_space_fixup_test_1 {} {
     }
 
     # ELF (osf) doesn't really handle extra sections too well...
-    if [istarget hppa*-*-*elf*] then {
+    if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
        return;
     }
 
@@ -398,7 +401,7 @@ proc do_cross_space_fixup_test_2 {} {
     }
 
     # ELF (osf) doesn't really handle extra sections too well...
-    if [istarget hppa*-*-*elf*] then {
+    if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
        return;
     }
 
@@ -431,7 +434,7 @@ proc do_round_mode_test {} {
        # Make sure GAS generated correct relocations to switch rounding modes.
        # Also make sure (for SOM) that redundant rounding mode relocations
        # were eliminated.
-       if { [istarget hppa*-*-*elf*] || [istarget hppa*w-*-*] } then {
+       if { [istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*] || [istarget hppa*w-*-*] } then {
            while 1 {
                expect {
                    -re "^0+\[^\n\]*DIR21L\[^\n\]*\n"
@@ -484,7 +487,7 @@ proc do_round_mode_test {} {
        objdump_finish
 
        # Did we find what we were looking for?  If not, flunk it.
-       if {[istarget hppa*-*-*elf*] || [istarget hppa*w-*-*] } then {
+       if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*] || [istarget hppa*w-*-*] } then {
            if [expr $x==8] then { pass $testname } else { fail $testname }
        } else {
            if [expr $x==3] then { pass $testname } else { fail $testname }
@@ -584,7 +587,7 @@ proc do_pic_relocation_test {} {
     }
 
     # ELF (osf) doesn't really handle extra sections too well...
-    if [istarget hppa*-*-*elf*] then {
+    if {[istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*]} then {
        return;
     }
 

diff --git a/gas/testsuite/gas/hppa/unsorted/unsorted.exp b/gas/testsuite/gas/hppa/unsorted/unsorted.exp
index 5487fd987c6e7190b9dcd386fb0ac520e74cf306..02ce4e6fa455ed5d1fe196b653798743543465cc 100644 (file)
--- a/gas/testsuite/gas/hppa/unsorted/unsorted.exp
+++ b/gas/testsuite/gas/hppa/unsorted/unsorted.exp
@@ -24,7 +24,7 @@ proc do_subspace_align_test {} {
     set testname "ss_align.s: Test subspace alignment (part 2)"
     set x 0
 
-    if { [istarget hppa*-*-*elf*] || [istarget hppa*w-*-*] } then {
+    if { [istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*] || [istarget hppa*w-*-*] } then {
       return 
     }
 
@@ -107,7 +107,7 @@ proc do_align3_test {} {
     set testname "align3.s: Test for alignment bug when switching subspaces (part2)"
     set x 0
 
-    if { [istarget hppa*-*-*elf*] || [istarget hppa*w-*-*] } then {
+    if { [istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*] || [istarget hppa*w-*-*] } then {
       return 
     }
 
@@ -138,7 +138,7 @@ proc do_align4_test {} {
     set testname "align4.s: More subspace alignment tests (part2)"
     set x 0
 
-    if { [istarget hppa*-*-*elf*] || [istarget hppa*w-*-*] } then {
+    if { [istarget hppa*-*-*elf*] || [istarget hppa*-*-linux*] || [istarget hppa*w-*-*] } then {
        return
     }
 

diff --git a/gas/testsuite/gas/vtable/entry0.s b/gas/testsuite/gas/vtable/entry0.s
index 36f89e389496adaf92298eec7c7786f670dfc20a..878c44c00605645956a7a863129af5a4386e480f 100644 (file)
--- a/gas/testsuite/gas/vtable/entry0.s
+++ b/gas/testsuite/gas/vtable/entry0.s
@@ -1,2 +1,2 @@
-.text
-.vtable_entry vtbl_a, 16
+ .text
+ .vtable_entry vtbl_a, 16

diff --git a/gas/testsuite/gas/vtable/entry1.s b/gas/testsuite/gas/vtable/entry1.s
index 36f89e389496adaf92298eec7c7786f670dfc20a..878c44c00605645956a7a863129af5a4386e480f 100644 (file)
--- a/gas/testsuite/gas/vtable/entry1.s
+++ b/gas/testsuite/gas/vtable/entry1.s
@@ -1,2 +1,2 @@
-.text
-.vtable_entry vtbl_a, 16
+ .text
+ .vtable_entry vtbl_a, 16

diff --git a/gas/testsuite/gas/vtable/inherit0.s b/gas/testsuite/gas/vtable/inherit0.s
index d438df6954ff935d4bf59b7a8f854a26ffce2041..67fad709e70b4659c84a244e6ae5f8e05e38ad51 100644 (file)
--- a/gas/testsuite/gas/vtable/inherit0.s
+++ b/gas/testsuite/gas/vtable/inherit0.s
@@ -1,13 +1,13 @@
-.data
+ .data
 
-.type vtbl_a,object
+ .type vtbl_a,object
 vtbl_a:
        .space 16
-.size vtbl_a,16
-.vtable_inherit vtbl_a, 0
+ .size vtbl_a,16
+ .vtable_inherit vtbl_a, 0
 
-.type vtbl_b,object
+ .type vtbl_b,object
 vtbl_b:
        .space 16
-.size vtbl_b,16
-.vtable_inherit vtbl_b, vtbl_a
+ .size vtbl_b,16
+ .vtable_inherit vtbl_b, vtbl_a

diff --git a/gas/testsuite/gas/vtable/inherit1.s b/gas/testsuite/gas/vtable/inherit1.s
index 7dd1d2877b7119868fa96699ffc36008dda0086e..46f2b092fe9bc9a4960eb15d0bd56c22ef7863c6 100644 (file)
--- a/gas/testsuite/gas/vtable/inherit1.s
+++ b/gas/testsuite/gas/vtable/inherit1.s
@@ -1 +1 @@
-.vtable_inherit vtbl_a, 0
+ .vtable_inherit vtbl_a, 0