* gas/m68k/link.s, gas/m68k/link.d: New test.

	* gas/m68k/all.exp: Run it.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index f3a78ba..2a87393 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Thu Nov  2 23:11:05 1995  Ian Lance Taylor  <ian@cygnus.com>
+
+       * gas/m68k/link.s, gas/m68k/link.d: New test.
+       * gas/m68k/all.exp: Run it.
+
 Tue Oct 24 10:57:20 1995  Jeffrey A Law  (law@cygnus.com)
 
        * gas/hppa/basic/basic.exp: Test lci and syncdma instructions.

diff --git a/gas/testsuite/gas/m68k/.Sanitize b/gas/testsuite/gas/m68k/.Sanitize
index 154caa1..8e171aa 100644 (file)
--- a/gas/testsuite/gas/m68k/.Sanitize
+++ b/gas/testsuite/gas/m68k/.Sanitize
@@ -31,6 +31,8 @@ bitfield.s
 cas.d
 cas.s
 disperr.s
+link.d
+link.s
 op68000.d
 operands.d
 operands.s

diff --git a/gas/testsuite/gas/m68k/all.exp b/gas/testsuite/gas/m68k/all.exp
index f5de213..54553c1 100644 (file)
--- a/gas/testsuite/gas/m68k/all.exp
+++ b/gas/testsuite/gas/m68k/all.exp
@@ -13,7 +13,7 @@ if [istarget m68*-*-*] then {
     if [expr [istarget m68*-*-hpux*] || [istarget m68*-*-sun*] \
                || [istarget m68*-*-*aout*] \
                || [istarget m68*-*-coff*] \
-               || [istarget m68*-*-vxworks5.1] \
+               || [istarget m68*-*-vxworks*] \
                ] then {
        run_dump_test "schwab"
     }
@@ -21,6 +21,7 @@ if [istarget m68*-*-*] then {
     run_dump_test operands
     run_dump_test cas
     run_dump_test bitfield
+    run_dump_test link
 
     set testname "68000 operands"
     gas_run "operands.s" "-m68000" "2>err.out"

diff --git a/gas/testsuite/gas/m68k/link.d b/gas/testsuite/gas/m68k/link.d
new file mode 100644 (file)
index 0000000..389273a
--- /dev/null
+++ b/gas/testsuite/gas/m68k/link.d
@@ -0,0 +1,16 @@
+#objdump: -d
+#name: link
+
+# Test handling of link instruction.
+
+.*: +file format .*
+
+Disassembly of section .text:
+0+000 <foo> linkw %fp,#0
+0+004 <foo\+4> linkw %fp,#-4
+0+008 <foo\+8> linkw %fp,#-32767
+0+00c <foo\+c> linkw %fp,#-32768
+0+010 <foo\+10> linkl %fp,#-32769
+0+016 <foo\+16> linkw %fp,#32767
+0+01a <foo\+1a> linkl %fp,#32768
+0+020 <foo\+20> linkl %fp,#32769

diff --git a/gas/testsuite/gas/m68k/link.s b/gas/testsuite/gas/m68k/link.s
new file mode 100644 (file)
index 0000000..8db455b
--- /dev/null
+++ b/gas/testsuite/gas/m68k/link.s
@@ -0,0 +1,12 @@
+# Test handling of link instruction.
+       .text
+       .globl  foo
+foo:
+       link    %a6,#0
+       link    %a6,#-4
+       link    %a6,#-0x7fff
+       link    %a6,#-0x8000
+       link    %a6,#-0x8001
+       link    %a6,#0x7fff
+       link    %a6,#0x8000
+       link    %a6,#0x8001