Index: /branches/ia32/compiler/X86/x86-asm.lisp
===================================================================
--- /branches/ia32/compiler/X86/x86-asm.lisp	(revision 9543)
+++ /branches/ia32/compiler/X86/x86-asm.lisp	(revision 9544)
@@ -3295,4 +3295,8 @@
      #x0fd4 #o000 #x0 #x66)
 
+   ;; psrad
+   (def-x86-opcode psrad ((:regmmx :insert-mmx-rm) (:regmmx :insert-mmx-reg))
+     #x0fe2 #o300 #x0)
+
 ;;; End of list of useful mmx instructions