gas/:
[platform/upstream/binutils.git] / gas / testsuite / gas / mips / mips.exp
index 2d515a9..344e62b 100644 (file)
@@ -254,7 +254,7 @@ proc mips_arch_list_matching {args} {
        # properties actually are.
        if { [string compare $arch default] == 0
             && [string length [mips_arch_properties default]] == 0} {
-           continue;
+           continue
        }
        if { [mips_arch_matches $arch $args] } {
            lappend l $arch
@@ -292,27 +292,6 @@ proc run_dump_test_arches { name arch_list } {
     }
 }
 
-# run_list_test NAME OPTS (optional): TESTNAME
-#
-# Assemble the file "NAME.d" and compare the assembler standard error
-# output against the regular expressions given in the file "NAME.l".
-# The assembler is passed the flags given in OPTS.  If TESTNAME is
-# provided, it will be used as the name of the test.
-proc run_list_test { name opts {testname {}} } {
-    global srcdir subdir
-    if { [string length $testname] == 0 } then {
-           set testname "MIPS $name"
-    }
-    set file $srcdir/$subdir/$name
-    gas_run ${name}.s $opts ">&dump.out"
-    if { [regexp_diff "dump.out" "${file}.l"] } then {
-       fail $testname
-       verbose "output is [file_contents "dump.out"]" 2
-       return
-    }
-    pass $testname
-}
-
 # run_list_test_arch NAME OPTS ARCH
 #
 # Invoke "run_list_test" for test NAME with options OPTS, with extra
@@ -383,12 +362,16 @@ mips_arch_create sb1      64      mips64  { mips3d } \
                        { -march=sb1 -mtune=sb1 } { -mmips:sb1 } \
                        { mipsisa64sb1-*-* mipsisa64sb1el-*-* }
 
-
 #
-# And now begin the actual tests!
+# And now begin the actual tests!  VxWorks uses RELA rather than REL
+# relocations, so most of the generic dump tests will not work there.
 #
-
-if { [istarget mips*-*-*] } then {
+if { [istarget mips*-*-vxworks*] } {
+    run_dump_test "vxworks1"
+    run_dump_test "vxworks1-xgot"
+    run_dump_test "vxworks1-el"
+    run_dump_test "vxworks1-xgot-el"
+} elseif { [istarget mips*-*-*] } {
     set no_mips16 0
     set elf [expr [istarget *-*-elf*] || [istarget *-*-irix5*] || [istarget *-*-irix6* ] || [istarget *-*-linux*] || [istarget *-*-netbsd*] ]
     set ecoff [expr [istarget *-*-ecoff*] || [istarget *-*-ultrix*] || [istarget *-*-irix\[1-4\]*] ]
@@ -398,7 +381,7 @@ if { [istarget mips*-*-*] } then {
     set addr32 [expr [istarget mipstx39*-*-*] || [istarget mips-*-linux*] || [istarget mipsel-*-linux*]]
     set has_newabi [expr [istarget *-*-irix6*] || [istarget mips64*-*-linux*]]
 
-    if { [istarget "mips*-*-*linux*"] } then {
+    if { [istarget "mips*-*-*linux*"] || [istarget "mips*-sde-elf*"] } then {
        set tmips "t"
     } else {
        set tmips ""
@@ -427,8 +410,12 @@ if { [istarget mips*-*-*] } then {
     run_dump_test_arches "blt"         [mips_arch_list_matching mips2]
     run_dump_test_arches "bltu"                [mips_arch_list_matching mips2]
     run_dump_test_arches "branch-misc-1" [mips_arch_list_matching mips1]
-    run_list_test_arches "branch-misc-2" "-32 -non_shared" [mips_arch_list_matching mips1]
-    run_list_test_arches "branch-misc-2pic" "-32 -call_shared" [mips_arch_list_matching mips1]
+    run_dump_test_arches "branch-misc-2" [mips_arch_list_matching mips1]
+    run_dump_test_arches "branch-misc-2pic" [mips_arch_list_matching mips1]
+    run_dump_test_arches "branch-misc-2-64" [mips_arch_list_matching mips3]
+    run_dump_test_arches "branch-misc-2pic-64" [mips_arch_list_matching mips3]
+    run_dump_test "branch-misc-3"
+    run_dump_test "branch-swap"
 
     if $ilocks {
        run_dump_test "div-ilocks"
@@ -445,24 +432,11 @@ if { [istarget mips*-*-*] } then {
     }
     if $elf { run_dump_test "jal-svr4pic" }
     if $elf { run_dump_test "jal-xgot" }
-    # LOSE: As of 2002-02-08, the jal-empic test fails for target mips-ecoff.
-    # It appears that it broke between 2000-03-11 00:00UTC and
-    # 2000-03-12 00:00 UTC.
-    if $ecoff { run_dump_test "jal-empic" }
-    if $elf {
-       run_dump_test_arches "jal-empic-elf" [mips_arch_list_matching mips1]
-       run_dump_test_arches "jal-empic-elf-2" [mips_arch_list_matching mips1]
-       run_dump_test_arches "jal-empic-elf-3" [mips_arch_list_matching mips1]
-    }
     run_list_test_arches "jal-range" "-32" [mips_arch_list_matching mips1]
     if $has_newabi { run_dump_test "jal-newabi" }
     if !$aout { run_dump_test "la" }
     if $elf { run_dump_test "la-svr4pic" }
     if $elf { run_dump_test "la-xgot" }
-    # LOSE: As of 2002-02-08, the la-empic test fails for target mips-ecoff.
-    # Not sure when it first cropped up, but may be related to addition of
-    # "la" -> "addiu" pattern in MIPS opcode table long ago.
-    if $ecoff { run_dump_test "la-empic" }
     if $elf { run_dump_test "lca-svr4pic" }
     if $elf { run_dump_test "lca-xgot" }
     if !$aout {
@@ -471,7 +445,8 @@ if { [istarget mips*-*-*] } then {
        run_dump_test_arches "lb"       [mips_arch_list_matching !mips2]
     }
     if $elf {
-       run_dump_test_arches "lb-svr4pic" [mips_arch_list_matching mips1]
+       run_dump_test_arches "lb-svr4pic" [mips_arch_list_matching !gpr_ilocks]
+       run_dump_test_arches "lb-svr4pic-ilocks" [mips_arch_list_matching gpr_ilocks]
     }
     if $elf {
        # Both versions specify the cpu, so we can run both regardless of
@@ -479,7 +454,6 @@ if { [istarget mips*-*-*] } then {
        run_dump_test "lb-xgot"
        run_dump_test "lb-xgot-ilocks"
     }
-    if $ecoff { run_dump_test "lb-empic" }
     if !$aout {
         if !$gpr_ilocks {
             run_dump_test "ld"
@@ -493,15 +467,10 @@ if { [istarget mips*-*-*] } then {
     }
     if $elf { run_dump_test "ld-svr4pic" }
     if $elf { run_dump_test "ld-xgot" }
-    if $ecoff { run_dump_test "ld-empic" }
     run_dump_test_arches "li"          [mips_arch_list_matching mips1]
     if !$aout { run_dump_test "lifloat" }
     if $elf { run_dump_test "lif-svr4pic" }
     if $elf { run_dump_test "lif-xgot" }
-    # LOSE: As of 2002-02-08, the lif-empic test fails for target mips-ecoff.
-    # It appears that it broke between 2000-03-11 00:00UTC and
-    # 2000-03-12 00:00 UTC.
-    if $ecoff { run_dump_test "lif-empic" }
     run_dump_test_arches "mips4"       [mips_arch_list_matching mips4]
     run_dump_test_arches "mips5"       [mips_arch_list_matching mips5]
     if $ilocks {
@@ -523,7 +492,6 @@ if { [istarget mips*-*-*] } then {
     run_dump_test_arches "ulh2-el"     [mips_arch_list_matching mips1]
     if $elf { run_dump_test "ulh-svr4pic" }
     if $elf { run_dump_test "ulh-xgot" }
-    if $ecoff { run_dump_test "ulh-empic" }
     if !$aout {
        run_dump_test "ulw"
        run_dump_test "uld"
@@ -543,9 +511,17 @@ if { [istarget mips*-*-*] } then {
     # supports the necessary mips16 reloc.
     if { $elf && !$no_mips16 } {
        run_dump_test "mips16"
+       run_dump_test "mips16-64"
+       # Check MIPS16e extensions
+       run_dump_test_arches "mips16e"  [mips_arch_list_matching mips32]
        # Check jalx handling
        run_dump_test "mips16-jalx"
        run_dump_test "mips-jalx"
+       # Check MIPS16 HI16/LO16 relocations
+       run_dump_test "mips16-hilo"
+       if $has_newabi {
+           run_dump_test "mips16-hilo-n32"
+       }
     }
     run_list_test "mips-no-jalx" "-32"
     run_dump_test "delay"
@@ -555,7 +531,8 @@ if { [istarget mips*-*-*] } then {
     run_dump_test "mips4100"
     run_dump_test "vr4111"
     run_dump_test "vr4120"
-    run_dump_test "vr4122"
+    run_dump_test "vr4120-2"
+    run_dump_test "vr4130"
     run_dump_test "vr5400"
     run_dump_test "vr5500"
     run_dump_test "rm7000"
@@ -565,6 +542,8 @@ if { [istarget mips*-*-*] } then {
 
     run_dump_test_arches "mips32"      [mips_arch_list_matching mips32]
 
+    run_dump_test_arches "mips32-sf32" [mips_arch_list_matching mips32]
+
     run_dump_test_arches "mips32r2"    [mips_arch_list_matching mips32r2]
     run_list_test_arches "mips32r2-ill" "-32" \
                         [mips_arch_list_matching mips32r2 gpr32]
@@ -588,6 +567,9 @@ if { [istarget mips*-*-*] } then {
     }
 
     run_dump_test "relax"
+    run_dump_test "relax-swap1-mips1"
+    run_dump_test "relax-swap1-mips2"
+    run_dump_test "relax-swap2"
 
     run_list_test "illegal" "-32"
     run_list_test "baddata1" "-32"
@@ -636,20 +618,17 @@ if { [istarget mips*-*-*] } then {
        run_dump_test "mips-abi32-pic2"
 
        run_dump_test "elf${el}-rel"
-       if {[istarget mips64*-*-*] || [istarget mipsisa32*-*-*]
-           || [istarget mipsisa64*-*-*]} { 
-           run_dump_test "elf${el}-rel2"
-       } else {
-           run_dump_test "e32${el}-rel2"
-       }
+       run_dump_test_arches "elf${el}-rel2" [mips_arch_list_matching gpr64]
+       run_dump_test "e32${el}-rel2"
        run_dump_test "elf${el}-rel3"
-       if {[istarget mips64*-*-*]} {
-           run_dump_test "elf-rel4"
-       } else {
-           run_dump_test "e32-rel4"
-       }
+       run_dump_test_arches "elf-rel4" [mips_arch_list_matching gpr64]
+       run_dump_test "e32-rel4"
        run_dump_test "elf-rel5"
        run_dump_test "elf-rel6"
+       if $has_newabi {
+           run_dump_test "elf-rel6-n32"
+           run_dump_test "elf-rel6-n64"
+       }
        run_dump_test "elf-rel7"
        run_dump_test "elf-rel8"
        run_dump_test "elf-rel9"
@@ -671,18 +650,33 @@ if { [istarget mips*-*-*] } then {
            run_dump_test "elf-rel-xgot-n64"
        }
        run_dump_test "elf-rel17"
+       if $has_newabi {
+           run_dump_test "elf-rel18"
+       }
+       run_dump_test "elf-rel19"
+       run_dump_test "elf-rel20"
+       if $has_newabi {
+           run_dump_test "elf-rel21"
+           run_dump_test "elf-rel22"
+           run_dump_test "elf-rel23"
+           run_dump_test "elf-rel23a"
+           run_dump_test "elf-rel23b"
+           run_dump_test "elf-rel24"
+       }
+
+       run_dump_test "elf-rel25"
+       run_dump_test "elf-rel25a"
+       run_dump_test "elf-rel26"
 
-       run_dump_test "${tmips}${el}empic"
-       run_dump_test "empic2"
-       run_dump_test "empic3_e"
-       run_dump_test "empic3_g1"
-       run_dump_test "empic3_g2"
        if { !$no_mips16 } {
            run_dump_test "${tmips}mips${el}16-e"
            run_dump_test "${tmips}mips${el}16-f"
        }
        run_dump_test "elf-consthilo"
        run_dump_test "expr1"
+
+       run_list_test "tls-ill" "-32"
+       run_dump_test "tls-o32"
     }
 
     if $has_newabi {
@@ -720,11 +714,69 @@ if { [istarget mips*-*-*] } then {
     run_dump_test "hwr-names-mips64r2"
 
     run_dump_test "ldstla-32"
+    run_dump_test "ldstla-32-mips3"
     run_dump_test "ldstla-32-shared"
+    run_dump_test "ldstla-32-mips3-shared"
+    run_list_test "ldstla-32-1" "-mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32)"
+    run_list_test "ldstla-32-mips3-1" "-mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32, mips3)"
+    run_list_test "ldstla-32-1" "-KPIC -mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32, shared)"
+    run_list_test "ldstla-32-mips3-1" "-KPIC -mabi=32" \
+       "MIPS ld-st-la bad constants (ABI o32, mips3, shared)"
+    run_dump_test "ldstla-eabi64"
     if $has_newabi {
-       run_dump_test "ldstla-n32"
-       run_dump_test "ldstla-n32-shared"
        run_dump_test "ldstla-n64"
        run_dump_test "ldstla-n64-shared"
+       run_dump_test "ldstla-n64-sym32"
+    }
+
+    run_dump_test "macro-warn-1"
+    run_dump_test "macro-warn-2"
+    run_dump_test "macro-warn-3"
+    run_dump_test "macro-warn-4"
+    if $has_newabi {
+       run_dump_test "macro-warn-1-n32"
+       run_dump_test "macro-warn-2-n32"
+    }
+
+    run_dump_test "noat-1"
+    run_list_test "noat-2" ""
+    run_list_test "noat-3" ""
+    run_list_test "noat-4" ""
+    run_list_test "noat-5" ""
+    run_list_test "noat-6" ""
+    run_list_test "noat-7" ""
+
+    run_dump_test "at-1"
+    run_list_test "at-2" "-32 -mips1" "MIPS at-2"
+
+    run_dump_test_arches "smartmips"   [mips_arch_list_matching mips32 !gpr64]
+    run_dump_test_arches "mips32-dsp"  [mips_arch_list_matching mips32r2]
+    run_dump_test_arches "mips32-dspr2"        [mips_arch_list_matching mips32r2]
+    run_dump_test_arches "mips64-dsp"  [mips_arch_list_matching mips64r2]
+    run_dump_test_arches "mips32-mt"   [mips_arch_list_matching mips32r2 !gpr64]
+
+    if { $elf && !$no_mips16 } {
+       run_dump_test "mips16-dwarf2"
+       if $has_newabi {
+           run_dump_test "mips16-dwarf2-n32"
+       }
+    }
+    if { !$no_mips16 } { 
+        run_dump_test "mips16e-jrc"
+        run_dump_test "mips16e-save"
+        run_dump_test "mips16e-64"
+        run_list_test "mips16e-64" "-march=mips32 -32"
+        run_dump_test "mips16-intermix"
     }
+    run_dump_test "vxworks1"
+    run_dump_test "vxworks1-xgot"
+    run_dump_test "vxworks1-el"
+    run_dump_test "vxworks1-xgot-el"
+
+    run_dump_test "noreorder"
+    run_dump_test "align"
+    run_dump_test "odd-float"
 }