* gas/mri/common.s, gas/mri/common.d: New test.

	* gas/mri/mri.exp: Run it.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 93d8ad40a36dfaaf0021b054d9f1e9da9c9f1596..37041ffc2d3361e31e31d28096d314ea7eb46182 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Tue Aug  8 17:11:39 1995  Ian Lance Taylor  <ian@cygnus.com>
+
+       * gas/mri/common.s, gas/mri/common.d: New test.
+       * gas/mri/mri.exp: Run it.
+
 Mon Aug  7 22:39:28 1995  Ian Lance Taylor  <ian@cygnus.com>
 
        * gas/mri/mri.exp: Add setup_xfail for a29k*-*-* for constants

diff --git a/gas/testsuite/gas/mri/.Sanitize b/gas/testsuite/gas/mri/.Sanitize
index e63b25eee1c8e1e05f13c38be2e4f01fee1eade8..19e47f912eb4a3290ae8fd1a27e3b0275e73be7b 100644 (file)
--- a/gas/testsuite/gas/mri/.Sanitize
+++ b/gas/testsuite/gas/mri/.Sanitize
@@ -26,6 +26,8 @@ Things-to-keep:
 
 char.d
 char.s
+common.d
+common.s
 constants.d
 constants.s
 equ.d

diff --git a/gas/testsuite/gas/mri/common.d b/gas/testsuite/gas/mri/common.d
new file mode 100644 (file)
index 0000000..c1c1530
--- /dev/null
+++ b/gas/testsuite/gas/mri/common.d
@@ -0,0 +1,8 @@
+#nm: --extern-only
+#name: MRI common sections
+#as: -M
+
+# Test MRI common sections
+
+0+08 C 00com2
+0+08 C com1

diff --git a/gas/testsuite/gas/mri/common.s b/gas/testsuite/gas/mri/common.s
new file mode 100644 (file)
index 0000000..58b4c6c
--- /dev/null
+++ b/gas/testsuite/gas/mri/common.s
@@ -0,0 +1,11 @@
+; Test MRI common sections
+       common  com1
+       ds.l    1
+com2   common 00
+       ds.l    1
+incom  ds.l    1
+       common  com1
+       ds.l    1
+       .data
+       dc.l    com1
+       dc.l    incom

diff --git a/gas/testsuite/gas/mri/mri.exp b/gas/testsuite/gas/mri/mri.exp
index a8bd76ca31ef9547916267fdf8a84c4f785c2896..b97a7d11886c1a6733f9e45bb5c793a0556adc7b 100644 (file)
--- a/gas/testsuite/gas/mri/mri.exp
+++ b/gas/testsuite/gas/mri/mri.exp
@@ -2,12 +2,21 @@
 # Test the MRI compatibility mode.
 #
 run_dump_test label
+
 setup_xfail "hppa*-*-*"
 run_dump_test equ
+
 setup_xfail "hppa*-*-*"
 setup_xfail "a29k*-*-*"
 run_dump_test constants
+
 run_dump_test float
+
 run_dump_test char
+
 setup_xfail "hppa*-*-*"
 run_dump_test expr
+
+setup_xfail "alpha*-*-*"
+setup_xfail "sparc*-*-*"
+run_dump_test common