0.9.3.58:

[sbcl.git] / src / assembly / ppc / arith.lisp

diff --git a/src/assembly/ppc/arith.lisp b/src/assembly/ppc/arith.lisp
index 0abf902..ea9fc11 100644 (file)
--- a/src/assembly/ppc/arith.lisp
+++ b/src/assembly/ppc/arith.lisp
@@ -199,7 +199,7 @@
               `((inst srawi x x 2)))
           (inst mullw res x y))))
   (frob unsigned-* "unsigned *" 40 unsigned-num unsigned-reg)
-  (frob signed-* "unsigned *" 41 signed-num signed-reg)
+  (frob signed-* "signed *" 41 signed-num signed-reg)
   (frob fixnum-* "fixnum *" 30 tagged-num any-reg))