Wed May 7 16:18:30 1997 Manfred Hollstein <manfred@s-direktnet.de>

* gas/m88k/init.{s,d}: New checks for proper padding of
	.init sections.
	* gas/m88k/m88.exp: Run them.

	* gas/m68k/t2.d: New file for check of presence of section
	symbols on the m68k-motorola-sysv.
	* gas/m68k/all.exp: Run t2 if [istarget m68*-motorola-sysv].

gas/testsuite/gas/.Sanitize

@@ -59,6 +59,7 @@ ieee-fp
 m32r
 m68k
 m68k-coff
+m88k
 macros
 mips
 mn10200

gas/testsuite/gas/m68k/.Sanitize

@@ -43,6 +43,7 @@ p2663.s
 pcrel.d
 pcrel.s
 pic1.s
+t2.d
 t2.s
 
 Things-to-lose:

gas/testsuite/gas/m68k/t2.d

@@ -0,0 +1,8 @@
+#PROG: nm
+#name: presence of section symbols
+
+00000012 b .bss
+0000000e d .data
+00000000 t .text
+0000000e d loop1
+00000000 t loop2

gas/testsuite/gas/m88k/.Sanitize

@@ -0,0 +1,36 @@
+# Sanitize.in for devo.
+#
+
+# Each directory to survive it's way into a release will need a file
+# like this one called "./.Sanitize".  All keyword lines must exist,
+# and must exist in the order specified by this file.  Each directory
+# in the tree will be processed, top down, in the following order.
+
+# Hash started lines like this one are comments and will be deleted
+# before anything else is done.  Blank lines will also be squashed
+# out.
+
+# The lines between the "Do-first:" line and the "Things-to-keep:"
+# line are executed as a /bin/sh shell script before anything else is
+# done in this 
+
+Do-first:
+
+
+# All files listed between the "Things-to-keep:" line and the
+# "Files-to-sed:" line will be kept.  All other files will be removed.
+# Directories listed in this section will have their own Sanitize
+# called.  Directories not listed will be removed in their entirety
+# with rm -rf.
+
+Things-to-keep:
+
+init.d
+init.s
+m88k.exp
+
+Things-to-lose:
+
+Do-last:
+
+# End of file.

gas/testsuite/gas/m88k/init.d

@@ -0,0 +1,11 @@
+#objdump: -d --prefix-addresses
+#name: padding of .init section
+
+.*: +file format .*
+
+Disassembly of section .text:
+Disassembly of section .init:
+00000000 <.init> subu        r31,r31,0x10
+00000004 <.init\+4> st          r13,r31,0x20
+00000008 <.init\+8> or          r0,r0,r0
+0000000c <.init\+c> or          r0,r0,r0

gas/testsuite/gas/m88k/init.s

@@ -0,0 +1,5 @@
+; Test proper padding of the .init section
+	section	 .init,"x"
+	align	 4
+	subu	 r31,r31,16
+	st	 r13,r31,32

gas/testsuite/gas/m88k/m88k.exp

@@ -0,0 +1,10 @@
+#
+# Tests for m88k svr3 targets
+#
+if { [istarget m88*-*-sysv3] || [istarget m88*-*-coff* ] } then {
+    set testname "Proper padding of .init section"
+    run_dump_test init
+}
+if [info exists errorInfo] then {
+    unset errorInfo
+}