master: Use dword sized registers after vpmovmskb

stassats via Sbcl-commits <[email protected]> Tue, 21 Jul 2026 04:01:08 +0000
Newsgroups gmane.lisp.steel-bank.cvs
Message-ID <[email protected]>
The branch "master" has been updated in SBCL:
       via  b7740944df24cf6ee985e0dc14c19d91f7ecd963 (commit)
      from  cead2bb6377fae8f57f8a3d8e20fbd6e72e150bf (commit)

- Log -----------------------------------------------------------------
commit b7740944df24cf6ee985e0dc14c19d91f7ecd963
Author: Stas Boukarev <[email protected]>
Date:   Tue Jul 21 06:55:58 2026 +0300

    Use dword sized registers after vpmovmskb
---
 src/code/x86-64-simd.lisp | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/src/code/x86-64-simd.lisp b/src/code/x86-64-simd.lisp
index 98a33959b..0421f684c 100644
--- a/src/code/x86-64-simd.lisp
+++ b/src/code/x86-64-simd.lisp
@@ -1966,7 +1966,7 @@
                ;; Skip an all-ASCII block
                (inst vpmaxub tmp2 current prev)
                (inst vpmovmskb tmp tmp2)
-               (inst test tmp tmp)
+               (inst test :dword tmp tmp)
                (inst jmp :z VALIDATED)
 
                (inst vpsubusb tmp2 tmp2 (register-inline-constant
@@ -2083,11 +2083,11 @@
         ASCII
         (inst vpcmpeqb tmp1 current zeros)
         (inst vpmovmskb tmp tmp1)
-        (inst test tmp tmp)
+        (inst test :dword tmp tmp)
         (inst jmp :nz ASCII-TAIL)
 
         (inst vpmovmskb tmp current)
-        (inst test tmp tmp)
+        (inst test :dword tmp tmp)
         (inst jmp :nz NON-ASCII)
 
         (inst add ptr 32)
@@ -2095,14 +2095,14 @@
         (inst jmp ASCII)
 
         ASCII-TAIL
-        (inst bsf tmp tmp)
+        (inst bsf :dword tmp tmp)
 
         (inst vpmovmskb byte-length current)
-        (inst test byte-length byte-length)
+        (inst test :dword byte-length byte-length)
         (inst jmp :z ALL-ASCII-DONE)
 
-        (inst bsf byte-length byte-length)
-        (inst cmp byte-length tmp)
+        (inst bsf :dword byte-length byte-length)
+        (inst cmp :dword byte-length tmp)
         (inst jmp :b NON-ASCII)
 
         ALL-ASCII-DONE
@@ -2151,7 +2151,7 @@
         START
         (inst vpcmpeqb tmp1 current zeros)
         (inst vpmovmskb tmp tmp1)
-        (inst test tmp tmp)
+        (inst test :dword tmp tmp)
         (inst jmp :nz TAIL)
 
         (validate)
@@ -2161,7 +2161,7 @@
         (inst jmp LOOP)
 
         TAIL
-        (inst bsf tmp tmp)
+        (inst bsf :dword tmp tmp)
 
         (inst vmovdqu tmp3 (register-inline-constant
                             :avx2

-----------------------------------------------------------------------


hooks/post-receive
-- 
SBCL