master: Remove a line of output from genesis

The branch "master" has been updated in SBCL:
       via  6bd776dee61987f6ce4f4104a1500ae3a3371a5a (commit)
      from  3025a181b090b2ce78847faa0af555f2a829effe (commit)

- Log -----------------------------------------------------------------
commit 6bd776dee61987f6ce4f4104a1500ae3a3371a5a
Author: Douglas Katzman <[email protected]>
Date:   Thu Jul 16 02:56:38 2026 +0000

    Remove a line of output from genesis
    
    Also fix some stype warnings if muffler gets reloaded
---
 src/cold/muffler.lisp             | 2 ++
 src/compiler/generic/genesis.lisp | 1 -
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/cold/muffler.lisp b/src/cold/muffler.lisp
index 1eadd20bc..fb3b019a0 100644
--- a/src/cold/muffler.lisp
+++ b/src/cold/muffler.lisp
@@ -17,6 +17,7 @@
 
 ;; This avoids muffling "could not optimize away %SAP-ALIEN"
 ;; and "SAP to pointer conversion" in case we care.
+(fmakunbound 'unable-to-optimize-note-p)
 (defun unable-to-optimize-note-p (condition)
   (and (string= (type-of condition) "SIMPLE-COMPILER-NOTE")
        (let ((fc (simple-condition-format-control condition)))
@@ -30,6 +31,7 @@
 (defvar *optional-and-key-warning-condition*
   (find-symbol "&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST" "SB-KERNEL"))
 
+(fmakunbound 'optional+key-style-warning-p)
 (defun optional+key-style-warning-p (condition)
   #+sbcl
   (when *optional-and-key-warning-condition*
diff --git a/src/compiler/generic/genesis.lisp b/src/compiler/generic/genesis.lisp
index a7e0037a2..107477ec9 100644
--- a/src/compiler/generic/genesis.lisp
+++ b/src/compiler/generic/genesis.lisp
@@ -4017,7 +4017,6 @@ INDEX   LINK-ADDR       FNAME    FUNCTION  NAME
       (write-bigvec-as-sequence data core-file :end n-data-bytes)
       (force-output core-file)
       (file-position core-file posn))
-    (format t "~&lisp linkage table: page=~D n-entries=~D~%" data-page n-table-entries)
     (write-words core-file
                  ;; 5 = number of words in this core header entry
                  lisp-linkage-space-core-entry-type-code 5

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


hooks/post-receive
-- 
SBCL