common-lisp/sbcl.sbcl
1
0
Fork 0
mirror of git://git.code.sf.net/p/sbcl/sbcl synced 2026-09-10 07:26:40 -04:00
Code Issues Actions 8 Packages Projects Releases Wiki Activity

x86-64: set the right cost for a VOP

Browse source
This commit is contained in:
Stas Boukarev 2026-09-08 04:00:33 +03:00
parent d638084646
commit 9c365edb59
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/compiler/x86-64/arith.lisp
View file

@ -4561,7 +4561,7 @@
:unused-if (csubtypep (tn-ref-type x-ref)
(specifier-type 'integer)))
temp)
(:generator 10
(:generator 9
(let ((fixnum-mask-p (and (= n-fixnum-tag-bits 1)
(= mask (ash most-positive-word -1)))))
(assemble ()