Tue Jun 2 15:08:36 1998 Geoff Keating <geoffk@ozemail.com.au>

	* gas/ppc/ppc.exp: Run simpshft test.
	* gas/ppc/simpshft.d: New file.
	* gas/ppc/simpshft.s: New file.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 2b9b7465eaac2bff581954c653982a6bb099b049..8b29f5b139fabe52e40c71e672463062dbc29d45 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+Tue Jun  2 15:08:36 1998  Geoff Keating  <geoffk@ozemail.com.au>
+
+       * gas/ppc/ppc.exp: Run simpshft test.
+       * gas/ppc/simpshft.d: New file.
+       * gas/ppc/simpshft.s: New file.
+
 Mon Jun  1 17:00:22 1998  Jeffrey A Law  (law@cygnus.com)
 
 start-sanitize-r5900

diff --git a/gas/testsuite/gas/ppc/.Sanitize b/gas/testsuite/gas/ppc/.Sanitize
index 1c8f3d43484aa6d8db79d52a830c31bdea7866fc..24cbded66c71ca5f7f81bb0da8d292a6ffdc924c 100644 (file)
--- a/gas/testsuite/gas/ppc/.Sanitize
+++ b/gas/testsuite/gas/ppc/.Sanitize
@@ -28,6 +28,8 @@ astest.s
 astest2.d
 astest2.s
 ppc.exp
+simpshft.d
+simpshft.s
 
 Things-to-lose:
 

diff --git a/gas/testsuite/gas/ppc/simpshft.d b/gas/testsuite/gas/ppc/simpshft.d
new file mode 100644 (file)
index 0000000..545df0b
--- /dev/null
+++ b/gas/testsuite/gas/ppc/simpshft.d
@@ -0,0 +1,28 @@
+#objdump: -s
+#as: -mppc64
+#name: PowerPC test 3, simplified shifts
+
+.*
+
+Contents of section \.text:
+ 0000 78640fe0 7883f80e 78a545e4 78640020  xd..x...x.E.xd. 
+ 0010 54640ffe 5083f800 54a5402e 5464043e  Td..P...T.@.Td.>
+ 0020 78640004 786407e4 7864f806 7864ffe6  xd..xd..xd..xd..
+ 0030 7864f842 7864ffe2 7864000c 7864080c  xd.Bxd..xd..xd..
+ 0040 78640fac 786407ec 78640000 78640800  xd..xd..xd..xd..
+ 0050 7864f802 78640000 7864f802 78640800  xd..xd..xd..xd..
+ 0060 78652010 786407e4 7864f806 78640000  xe .xd..xd..xd..
+ 0070 7864f842 78640fe0 78640000 78640040  xd.Bxd..xd..xd.@
+ 0080 786407e0 786407e4 786407a4 78640004  xd..xd..xd..xd..
+ 0090 78640008 78640048 786407e8 78640fa8  xd..xd.Hxd..xd..
+ 00a0 7864f80a 54640000 5464003e 5464f800  xd..Td..Td.>Td..
+ 00b0 5464f83e 5464f87e 5464fffe 50640000  Td.>Td.~Td..Pd..
+ 00c0 5064003e 50640ffe 5064f800 5064003e  Pd.>Pd..Pd..Pd.>
+ 00d0 506407fe 5464003e 5464083e 5464f83e  Pd..Td.>Td.>Td.>
+ 00e0 5464003e 5464f83e 5464083e 5c65203e  Td.>Td.>Td.>\\e >
+ 00f0 5464003e 5464083c 5464f800 5464003e  Td.>Td.<Td..Td.>
+ 0100 5464f87e 54640ffe 5464003e 5464007e  Td.~Td..Td.>Td.~
+ 0110 546407fe 5464003e 5464003c 54640000  Td..Td.>Td.<Td..
+ 0120 5464003e 5464007e 546407fe 54640fbc  Td.>Td.~Td..Td..
+ 0130 5464f800                             Td..            
+Contents of section \.data:

diff --git a/gas/testsuite/gas/ppc/simpshft.s b/gas/testsuite/gas/ppc/simpshft.s
new file mode 100644 (file)
index 0000000..0370dba
--- /dev/null
+++ b/gas/testsuite/gas/ppc/simpshft.s
@@ -0,0 +1,107 @@
+# These are all the examples from section F.4 of
+# "PowerPC Microprocessor Family: The Programming Environments".
+# 64-bit examples
+       extrdi  %r4,%r3,1,0
+       insrdi  %r3,%r4,1,0
+       sldi    %r5,%r5,8
+       clrldi  %r4,%r3,32
+# 32-bit examples
+       extrwi  %r4,%r3,1,0
+       insrwi  %r3,%r4,1,0
+       slwi    %r5,%r5,8
+       clrlwi  %r4,%r3,16
+
+
+# These test the remaining corner cases for 64-bit operations.
+       extldi  %r4,%r3,1,0
+       extldi  %r4,%r3,64,0
+       extldi  %r4,%r3,1,63
+       extldi  %r4,%r3,64,63    # bit weird, that one.
+       
+       extrdi  %r4,%r3,63,0
+       extrdi  %r4,%r3,1,62
+
+       insrdi  %r4,%r3,64,0
+       insrdi  %r4,%r3,63,0
+       insrdi  %r4,%r3,1,62
+       insrdi  %r4,%r3,1,63
+
+       rotldi  %r4,%r3,0
+       rotldi  %r4,%r3,1
+       rotldi  %r4,%r3,63
+
+       rotrdi  %r4,%r3,0
+       rotrdi  %r4,%r3,1
+       rotrdi  %r4,%r3,63
+
+       rotld   %r5,%r3,%r4
+
+       sldi    %r4,%r3,0
+       sldi    %r4,%r3,63
+
+       srdi    %r4,%r3,0
+       srdi    %r4,%r3,1
+       srdi    %r4,%r3,63
+
+       clrldi  %r4,%r3,0
+       clrldi  %r4,%r3,1
+       clrldi  %r4,%r3,63
+
+       clrrdi  %r4,%r3,0
+       clrrdi  %r4,%r3,1
+       clrrdi  %r4,%r3,63
+       
+       clrlsldi        %r4,%r3,0,0
+       clrlsldi        %r4,%r3,1,0
+       clrlsldi        %r4,%r3,63,0
+       clrlsldi        %r4,%r3,63,1
+       clrlsldi        %r4,%r3,63,63
+       
+# These test the remaining corner cases for 32-bit operations.
+       extlwi  %r4,%r3,1,0
+       extlwi  %r4,%r3,32,0
+       extlwi  %r4,%r3,1,31
+       extlwi  %r4,%r3,32,31    # bit weird, that one.
+       
+       extrwi  %r4,%r3,31,0
+       extrwi  %r4,%r3,1,30
+       
+       inslwi  %r4,%r3,1,0
+       inslwi  %r4,%r3,32,0
+       inslwi  %r4,%r3,1,31
+       
+       insrwi  %r4,%r3,1,0
+       insrwi  %r4,%r3,32,0
+       insrwi  %r4,%r3,1,31
+       
+       rotlwi  %r4,%r3,0
+       rotlwi  %r4,%r3,1
+       rotlwi  %r4,%r3,31
+
+       rotrwi  %r4,%r3,0
+       rotrwi  %r4,%r3,1
+       rotrwi  %r4,%r3,31
+
+       rotlw   %r5,%r3,%r4
+
+       slwi    %r4,%r3,0
+       slwi    %r4,%r3,1
+       slwi    %r4,%r3,31
+
+       srwi    %r4,%r3,0
+       srwi    %r4,%r3,1
+       srwi    %r4,%r3,31
+
+       clrlwi  %r4,%r3,0
+       clrlwi  %r4,%r3,1
+       clrlwi  %r4,%r3,31
+
+       clrrwi  %r4,%r3,0
+       clrrwi  %r4,%r3,1
+       clrrwi  %r4,%r3,31
+       
+       clrlslwi        %r4,%r3,0,0
+       clrlslwi        %r4,%r3,1,0
+       clrlslwi        %r4,%r3,31,0
+       clrlslwi        %r4,%r3,31,1
+       clrlslwi        %r4,%r3,31,31