[prev in list] [next in list] [prev in thread] [next in thread] 

List:       sbcl-commits
Subject:    [Sbcl-commits] master: Fix FIXME.
From:       apache--- via Sbcl-commits <sbcl-commits () lists ! sourceforge ! net>
Date:       2023-09-28 21:08:17
Message-ID: 1695935297.195678.9150 () sfp-scm-1 ! v30 ! lw ! sourceforge ! com
[Download RAW message or body]

The branch "master" has been updated in SBCL:
       via  5a6e5d09b7a48b668d40f9b1ffc255ac62447e60 (commit)
      from  e96d44e4040dc19dd4b6e71a555a64f5c341141d (commit)

- Log -----------------------------------------------------------------
commit 5a6e5d09b7a48b668d40f9b1ffc255ac62447e60
Author: Charles Zhang <charleszhang99@yahoo.com>
Date:   Wed Sep 13 22:00:19 2023 +0200

    Fix FIXME.
    
    It works now, and notes aren't produced for the compiler's
    incapability to do something anyway.
---
 src/compiler/main.lisp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/compiler/main.lisp b/src/compiler/main.lisp
index 1cd10b9e0..3a795922d 100644
--- a/src/compiler/main.lisp
+++ b/src/compiler/main.lisp
@@ -949,8 +949,7 @@ necessary, since type inference may take arbitrarily long to converge.")
 ;; a subtype of not-so-aptly-named INPUT-ERROR-IN-COMPILE-FILE.
 (defun %do-forms-from-info (function info condition-name)
   (declare (function function))
-  ; FIXME: why "could not stack-allocate" in a few call sites?
-  ; (declare (dynamic-extent function))
+  (declare (dynamic-extent function))
   (let* ((file-info (source-info-file-info info))
          (stream (get-source-stream info))
          (pos (file-position stream))

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


hooks/post-receive
-- 
SBCL


_______________________________________________
Sbcl-commits mailing list
Sbcl-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/sbcl-commits
[prev in list] [next in list] [prev in thread] [next in thread]