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

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

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.

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

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"

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

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