* gas/ppc/machine.s: New.

	* gas/ppc/machine.d: New.
	* gas/ppc/ppc.exp: Run it.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index e3aec5b7c8b51e8acb0370416dd63123e7977c91..447d3f68489e5e0698545e363de7778b8c938405 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2003-11-22  Alan Modra  <amodra@bigpond.net.au>
+
+       * gas/ppc/machine.s: New.
+       * gas/ppc/machine.d: New.
+       * gas/ppc/ppc.exp: Run it.
+
 2003-11-18  Maciej W. Rozycki  <macro@ds2.pg.gda.pl>
 
        * gas/mips/lca-svr4pic.d: New test for the "lca" macro.

diff --git a/gas/testsuite/gas/ppc/machine.d b/gas/testsuite/gas/ppc/machine.d
new file mode 100644 (file)
index 0000000..4c21759
--- /dev/null
+++ b/gas/testsuite/gas/ppc/machine.d
@@ -0,0 +1,9 @@
+#objdump: -s -j .text
+#name: PowerPC .machine test
+
+.*
+
+Contents of section \.text:
+ 0000 7c11eba6 7c100ba6 4c000066 00000200 .*
+ 0010 44000002 4c0000a4 7c000224 4e800020 .*
+ 0020 7c11eba6 .*

diff --git a/gas/testsuite/gas/ppc/machine.s b/gas/testsuite/gas/ppc/machine.s
new file mode 100644 (file)
index 0000000..3c6abfa
--- /dev/null
+++ b/gas/testsuite/gas/ppc/machine.s
@@ -0,0 +1,15 @@
+       .machine "403"
+       .text
+       mtpid 0
+       .machine push
+       .machine "booke"
+       mtpid 0
+       .machine Any
+       rfci
+       attn
+       sc
+       rfsvc
+       tlbiel 0
+       blr
+       .machine pop
+       mtpid 0

diff --git a/gas/testsuite/gas/ppc/ppc.exp b/gas/testsuite/gas/ppc/ppc.exp
index b891a95caaa9481db29ce5fa27854d92b865f3f0..0dd4648f021dcdf7e7fcb6cca799118de528b334 100644 (file)
--- a/gas/testsuite/gas/ppc/ppc.exp
+++ b/gas/testsuite/gas/ppc/ppc.exp
@@ -26,7 +26,8 @@ if { [istarget powerpc64*-*-*] || [istarget *-*-elf64*]} then {
 }
 
 if { [istarget powerpc*-*-*] } then {
-   run_dump_test "simpshft"
+    run_dump_test "simpshft"
+    run_dump_test "machine"
 
     if { [istarget powerpc-*-*aix*] } then {
        run_dump_test "altivec_xcoff"