2004-03-12 Michal Ludvig <mludvig@suse.cz>

* gas/i386/padlock.s, gas/i386/padlock.d: New tests for
	VIA PadLock instructions.
	* gas/i386/i386.exp: Run padlock tests.

gas/testsuite/ChangeLog

@@ -1,3 +1,9 @@
+2004-03-12  Michal Ludvig  <mludvig@suse.cz>
+
+	* gas/i386/padlock.s, gas/i386/padlock.d: New tests for 
+	VIA PadLock instructions.
+	* gas/i386/i386.exp: Run padlock tests.
+
 2004-03-12  Alan Modra  <amodra@bigpond.net.au>
 
 	* gas/i386/katmai.d: Revert last change.

gas/testsuite/gas/i386/i386.exp

@@ -58,6 +58,7 @@ if [expr ([istarget "i*86-*-*"] ||  [istarget "x86_64-*-*"]) && [gas_32_check]]
     run_dump_test "sub"
     run_dump_test "prescott"
     run_dump_test "divide"
+    run_dump_test "padlock"
 
     # PIC is only supported on ELF targets.
     if { ([istarget "*-*-elf*"] || [istarget "*-*-linux*"] )

gas/testsuite/gas/i386/padlock.d

@@ -0,0 +1,20 @@
+#objdump: -dw
+#name: i386 padlock
+
+.*: +file format .*
+
+Disassembly of section .text:
+
+00000000 <foo>:
+   0:[	 ]*0f a7 c0 [	 ]*xstorerng 
+   3:[	 ]*f3 0f a7 c0 [	 ]*repz xstorerng 
+   7:[	 ]*f3 0f a7 c8 [	 ]*repz xcryptecb 
+   b:[	 ]*f3 0f a7 c8 [	 ]*repz xcryptecb 
+   f:[	 ]*f3 0f a7 d0 [	 ]*repz xcryptcbc 
+  13:[	 ]*f3 0f a7 d0 [	 ]*repz xcryptcbc 
+  17:[	 ]*f3 0f a7 e0 [	 ]*repz xcryptcfb 
+  1b:[	 ]*f3 0f a7 e0 [	 ]*repz xcryptcfb 
+  1f:[	 ]*f3 0f a7 e8 [	 ]*repz xcryptofb 
+  23:[	 ]*f3 0f a7 e8 [	 ]*repz xcryptofb 
+  27:[	 ]*0f a7 c0 [	 ]*xstorerng 
+  2a:[	 ]*f3 0f a7 c0 [	 ]*repz xstorerng 

gas/testsuite/gas/i386/padlock.s

@@ -0,0 +1,16 @@
+# VIA Nehemiah PadLock instructions
+
+	.text
+foo:
+	xstorerng
+	rep xstorerng
+	xcryptecb
+	rep xcryptecb
+	xcryptcbc
+	rep xcryptcbc
+	xcryptcfb
+	rep xcryptcfb
+	xcryptofb
+	rep xcryptofb
+	xstore
+	rep xstore