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