master: Move an instruction.

The branch "master" has been updated in SBCL:
       via  ca69a527f008a3cd341aac45a9add920b234f84c (commit)
      from  b5c1bfad94d14e9c9b23afdc8ba9ef338be47fb8 (commit)

- Log -----------------------------------------------------------------
commit ca69a527f008a3cd341aac45a9add920b234f84c
Author: Stas Boukarev <[email protected]>
Date:   Fri Aug 21 23:26:35 2026 +0300

    Move an 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 0ee0cd84c..498e9000e 100644
--- a/src/code/x86-64-simd.lisp
+++ b/src/code/x86-64-simd.lisp
@@ -800,8 +800,7 @@
             (inst lea byte-array (ea byte-array* byte-start))
             (inst lea byte-end (ea -16 byte-end byte-array*))
 
-            (inst lea string-end (ea -64
-                                     string* string-end (ash 1 (- 2 n-fixnum-tag-bits))))
+            (inst lea string-end (ea -64 string* string-end (ash 1 (- 2 n-fixnum-tag-bits))))
             (inst lea string (ea string* string-start (ash 1 (- 2 n-fixnum-tag-bits))))
 
             (inst jmp start)
@@ -834,6 +833,7 @@
             (inst jmp LOOP)
 
             START-1-2
+            (inst add string-end 32) ;; now it writes 32 bytes instead of 64
             (broadcast c-c0 #xC0 8 tmp)
             (lea-const table (let ((table (make-array (* #b10101011 16) :initial-element #xFF)))
                                (loop for row to #b10101010 ;; highest possible inverted index for compressing 1/2 bytes
@@ -961,8 +961,6 @@
                 (inst jmp done)))
             FULL-START
 
-            (inst add string-end 32) ;; now it writes 32 bytes instead of 64
-
             (broadcast c-0f #x0F 8 tmp)
             (mov-const tbl1 #x38060001000000000000000000000000)
             (mov-const tbl2 #x2020242020202020202020100000010B)

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


hooks/post-receive
-- 
SBCL