master: Set *derive-function-types* to T in make-contrib

snuglas via Sbcl-commits <[email protected]> Mon, 13 Jul 2026 16:09:43 +0000
Newsgroups gmane.lisp.steel-bank.cvs
Message-ID <[email protected]>
The branch "master" has been updated in SBCL:
       via  cfbeebabb3027d130d6e4391569ad841fa7b0a32 (commit)
      from  90ce44aad599b74ab63595167f276fccd6f8b0d6 (commit)

- Log -----------------------------------------------------------------
commit cfbeebabb3027d130d6e4391569ad841fa7b0a32
Author: Douglas Katzman <[email protected]>
Date:   Mon Jul 13 16:08:32 2026 +0000

    Set *derive-function-types* to T in make-contrib
---
 contrib/make-contrib.lisp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/contrib/make-contrib.lisp b/contrib/make-contrib.lisp
index 11ff86221..512381f31 100644
--- a/contrib/make-contrib.lisp
+++ b/contrib/make-contrib.lisp
@@ -134,6 +134,8 @@
         ;; foreign-glue contains macros needed to compile the generated file
         (let ((*evaluator-mode* :compile)) (load "../sb-grovel/foreign-glue")))
       (let (wcu-warnings)
+        ;; SETQ is fine, we're going to exit this image soon enough
+        (setq sb-ext:*derive-function-types* t)
         (handler-bind (((and warning (not style-warning))
                         (lambda (c)
                           (unless (ignorable-warning-p c)

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


hooks/post-receive
-- 
SBCL