master: Use a smaller instruction
stassats via Sbcl-commits <[email protected]>
| Newsgroups | gmane.lisp.steel-bank.cvs |
|---|---|
| Message-ID | <[email protected]> |
The branch "master" has been updated in SBCL:
via 7f3f7b8ef3e03fde909915e516582dff710ad792 (commit)
from 4f0efb07bc1ea55374216c0896febbabcb47eeb2 (commit)
- Log -----------------------------------------------------------------
commit 7f3f7b8ef3e03fde909915e516582dff710ad792
Author: Stas Boukarev <[email protected]>
Date: Mon Aug 17 06:21:00 2026 +0300
Use a smaller instruction
---
src/code/x86-64-simd.lisp | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/src/code/x86-64-simd.lisp b/src/code/x86-64-simd.lisp
index e5736d6c0..2827e8cdc 100644
--- a/src/code/x86-64-simd.lisp
+++ b/src/code/x86-64-simd.lisp
@@ -1527,7 +1527,7 @@
((c-ffff complex-double-reg))
((c-d800 complex-double-reg))
- ((newlines int-avx2-reg))
+ ((newlines complex-double-reg))
((bytes int-avx2-reg))
((bytes2 int-avx2-reg))
((temp int-avx2-reg))
@@ -1629,9 +1629,7 @@
(inst vmovd temp tmp)
(inst vpbroadcastd c-7ff temp)
- (inst vmovdqu newlines (register-inline-constant :sse
- (concat-ub 32 (loop repeat 4
- collect 10))))
+ (inst vpmovzxbd newlines newlines)
(inst vpcmpeqd errors errors errors) ;; FF..FF
(inst vmovdqa c-d800 (register-inline-constant
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL