* gas/sh/err-at.s: New test.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index ff489dd..2c16bda 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2001-12-20  Alexandre Oliva  <aoliva@redhat.com>
+
+       * gas/sh/err-at.s: New test.
+
 2001-12-18  Hans-Peter Nilsson  <hp@axis.com>
 
        * gas/cris/rd-dw2-10.d: Tweak for change in gas dwarf2 line number

diff --git a/gas/testsuite/gas/sh/err-at.s b/gas/testsuite/gas/sh/err-at.s
new file mode 100644 (file)
index 0000000..648ee94
--- /dev/null
+++ b/gas/testsuite/gas/sh/err-at.s
@@ -0,0 +1,10 @@
+! { dg-do assemble }
+
+! Make sure we reject the invalid uses below:
+start:
+       mov.l   r1,@r0          ! ok
+       mov.l   r1,@(r0)        ! { dg-error "syntax error" }
+       mov.l   r1,@(r0,)       ! { dg-error "syntax error" }
+       mov.l   r1,@(r0,r0)     ! ok
+       mov.l   r1,@(r0,r1)     ! ok
+       mov.l   r1,@(r1,r0)     ! { dg-error "must be" }