master: dup directly from a vector register
stassats via Sbcl-commits <[email protected]> Tue, 21 Jul 2026 07:21:43 +0000
| Newsgroups | gmane.lisp.steel-bank.cvs |
|---|---|
| Message-ID | <[email protected]> |
The branch "master" has been updated in SBCL:
via b8c49e66c1d75ca4cc6b7a7939b01ccfe6fd61cf (commit)
from b7740944df24cf6ee985e0dc14c19d91f7ecd963 (commit)
- Log -----------------------------------------------------------------
commit b8c49e66c1d75ca4cc6b7a7939b01ccfe6fd61cf
Author: Stas Boukarev <[email protected]>
Date: Tue Jul 21 09:24:04 2026 +0300
dup directly from a vector register
---
src/code/arm64-simd.lisp | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/code/arm64-simd.lisp b/src/code/arm64-simd.lisp
index 557c631fd..65a896625 100644
--- a/src/code/arm64-simd.lisp
+++ b/src/code/arm64-simd.lisp
@@ -1507,15 +1507,15 @@
(inst cmtst tmp1 current current :16b)
(inst orr tmp1 tmp1 indexes :16b)
(inst uminv tmp1 tmp1 :16b)
- (inst fmov tmp (reg-in-sc tmp1 'single-reg))
+ (inst umov tmp tmp1 0 :b)
;; Zero out the bytes after the first zero
- (inst dup tmp1 tmp :16b)
+ (inst dup tmp1 tmp1 :16b 0)
(inst cmhi tmp1 tmp1 indexes :16b)
(inst and current current tmp1 :16b)
(inst sminv tmp1 current :16b)
- (inst fmov byte-length (reg-in-sc tmp1 'single-reg))
+ (inst umov byte-length tmp1 0 :b)
(inst tbnz byte-length 7 NON-ASCII)
(inst add ptr ptr tmp)
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL