X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fx86%2Fpred.lisp;h=5ed4fd905bf82dc4d6622ba78177412a7286f0d3;hb=74cf7a4d01664fbf72a662ba093ad67ca243b524;hp=02888871f54dc7642139b1b47a037092038d4b21;hpb=7f579b076a1fc54587538ead07e506e7f06f3fe8;p=sbcl.git diff --git a/src/compiler/x86/pred.lisp b/src/compiler/x86/pred.lisp index 0288887..5ed4fd9 100644 --- a/src/compiler/x86/pred.lisp +++ b/src/compiler/x86/pred.lisp @@ -82,8 +82,7 @@ the values, and VOP-name the name of the VOP that will be used to execute the conditional move.") -(defun - convert-conditional-move-p (node dst-tn x-tn y-tn) +(defun convert-conditional-move-p (node dst-tn x-tn y-tn) (declare (ignore node)) (let* ((ptype (sb!c::tn-primitive-type dst-tn)) (name (sb!c::primitive-type-name ptype))