X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fassembly%2Fsparc%2Farith.lisp;h=18a8659724a1fdfb443f917d21f500cedb91953f;hb=6fa968aaa8051da23cc3153a1c0e67addbea85f6;hp=61278cc658e820ba798a3d41943970d490d131ec;hpb=4898ef32c639b1c7f4ee13a5ba566ce6debd03e6;p=sbcl.git diff --git a/src/assembly/sparc/arith.lisp b/src/assembly/sparc/arith.lisp index 61278cc..18a8659 100644 --- a/src/assembly/sparc/arith.lisp +++ b/src/assembly/sparc/arith.lisp @@ -256,7 +256,7 @@ (inst mulscc temp zero-tn) (inst rdy res)))))) (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))