* ld-mips-elf/jalbal.d: New test.

* ld-mips-elf/jalbal.s: New test.
	* ld-mips-elf/mips-elf.exp: Run it.

ld/testsuite/ChangeLog

@@ -1,3 +1,9 @@
+2004-12-09  Ian Lance Taylor  <ian@wasabisystems.com>
+
+	* ld-mips-elf/jalbal.d: New test.
+	* ld-mips-elf/jalbal.s: New test.
+	* ld-mips-elf/mips-elf.exp: Run it.
+
 2004-12-08  Ian Lance Taylor  <ian@wasabisystems.com>
 
 	* ld-mips-elf/jaloverflow.d: New test.

ld/testsuite/ld-mips-elf/jalbal.d

@@ -0,0 +1,24 @@
+#name: jal to bal
+#source: jalbal.s
+#as: -EB -n32 -march=rm9000
+#ld: -e s1 -Ttext 0x100000a0
+#objdump: -d
+
+.*file format elf.*mips.*
+
+Disassembly of section \.text:
+
+.* <s1>:
+.*	0c00802a 	jal	.*100200a8 <s3>
+.*	00000000 	nop
+.*	04117fff 	bal	.*100200a8 <s3>
+
+.* <s2>:
+.*	\.\.\.
+
+.* <s3>:
+.*	04118000 	bal	.*100000ac <s2>
+.*	00000000 	nop
+.*	0c00002b 	jal	.*100000ac <s2>
+.*	00000000 	nop
+.*	\.\.\.

ld/testsuite/ld-mips-elf/jalbal.s

@@ -0,0 +1,18 @@
+# Test that jal gets converted to bal on the RM9000 when it is in range.
+	.text
+	.global	s1
+	.type	s1,@function
+	.set	noreorder
+s1:
+	jal	s3
+	nop
+	jal	s3
+s2:
+	nop
+	.space	0x1fff8
+s3:
+	jal	s2
+	nop
+	jal	s2
+	nop
+	nop

ld/testsuite/ld-mips-elf/mips-elf.exp

@@ -81,3 +81,4 @@ if {$has_newabi && $linux_gnu} {
 }
 
 run_dump_test "jaloverflow"
+run_dump_test "jalbal"