Index: /trunk/ccl/compiler/PPC/PPC64/ppc64-vinsns.lisp
===================================================================
--- /trunk/ccl/compiler/PPC/PPC64/ppc64-vinsns.lisp	(revision 427)
+++ /trunk/ccl/compiler/PPC/PPC64/ppc64-vinsns.lisp	(revision 428)
@@ -1349,5 +1349,5 @@
 			      (arg1 t))
 			     ())
-  (cmpw crf arg0 arg1))
+  (cmpd crf arg0 arg1))
 
 (define-ppc64-vinsn compare-to-nil (((crf :crf))