X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fppc%2Fpred.lisp;h=3834f9edcd30f5a213ed3bda395a51312569b339;hb=51344a3364f2cd6b14985719a77f697c094ea14d;hp=f6bd806a2bfee391452bbd1dc7bc5140034851b2;hpb=cab2c71bb1bb8a575d9eebdae335e731daa64183;p=sbcl.git diff --git a/src/compiler/ppc/pred.lisp b/src/compiler/ppc/pred.lisp index f6bd806..3834f9e 100644 --- a/src/compiler/ppc/pred.lisp +++ b/src/compiler/ppc/pred.lisp @@ -1,6 +1,6 @@ ;;; ;;; Converted by William Lott. -;;; +;;; (in-package "SB!VM") @@ -20,7 +20,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)