master: style-warning

The branch "master" has been updated in SBCL:
       via  1d412776bbdde08161837585b8554dde569c3f6f (commit)
      from  b6b1188ebfafdaaef369c881433a88890389f12b (commit)

- Log -----------------------------------------------------------------
commit 1d412776bbdde08161837585b8554dde569c3f6f
Author: Stas Boukarev <[email protected]>
Date:   Mon Jun 29 05:43:23 2026 +0300

    style-warning
---
 src/compiler/x86-64/float.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/compiler/x86-64/float.lisp b/src/compiler/x86-64/float.lisp
index de9fcdbe8..83bb0407f 100644
--- a/src/compiler/x86-64/float.lisp
+++ b/src/compiler/x86-64/float.lisp
@@ -87,8 +87,8 @@
           (etypecase x
             (single-float (inst movss y c))
             (double-float (inst movsd y c))
-            (complex-single-float (inst movq y c))
-            (complex-double-float (inst movupd y c)))))))
+            ((complex single-float) (inst movq y c))
+            ((complex double-float) (inst movupd y c)))))))
 
 (define-move-fun (load-single 2) (vop x y)
   ((single-stack) (single-reg))

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


hooks/post-receive
-- 
SBCL