X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fhppa%2Fpred.lisp;h=31f0f00747f1d3c62bdab2d2a101a3833bc149fb;hb=279283bc1724b60ef9ebbf31ab4837061989be18;hp=894ff0b2f4c0a6f9f70892b62f724433cfea7e6f;hpb=8a19c6876412b8ad1cf729297c2a373d63a0d0ec;p=sbcl.git diff --git a/src/compiler/hppa/pred.lisp b/src/compiler/hppa/pred.lisp index 894ff0b..31f0f00 100644 --- a/src/compiler/hppa/pred.lisp +++ b/src/compiler/hppa/pred.lisp @@ -16,7 +16,7 @@ (define-vop (if-eq) (:args (x :scs (any-reg descriptor-reg zero null)) - (y :scs (any-reg descriptor-reg zero null))) + (y :scs (any-reg descriptor-reg zero null))) (:conditional) (:info target not-p) (:policy :fast-safe)