master: Don't specify :result-arg for REVERSE

stassats via Sbcl-commits <[email protected]>
Newsgroups gmane.lisp.steel-bank.cvs
Message-ID <[email protected]>
The branch "master" has been updated in SBCL:
       via  913710ac98e1e1ad738d1dabd02015296a629c7d (commit)
      from  c1a075a94cfd5653cf53f47e7141662d557ceeea (commit)

- Log -----------------------------------------------------------------
commit 913710ac98e1e1ad738d1dabd02015296a629c7d
Author: Stas Boukarev <[email protected]>
Date:   Sun Aug 30 01:49:23 2026 +0300

    Don't specify :result-arg for REVERSE
    
    It's a copy.
---
 src/compiler/fndb.lisp | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/src/compiler/fndb.lisp b/src/compiler/fndb.lisp
index 9cfc51cfe..34dbcabe1 100644
--- a/src/compiler/fndb.lisp
+++ b/src/compiler/fndb.lisp
@@ -651,8 +651,7 @@
 (defknown length ((read-only proper-sequence)) index (foldable flushable dx-safe))
 
 (defknown reverse ((read-only proper-sequence)) consed-sequence (flushable foldable-read-only)
-  :derive-type (sequence-result-nth-arg 0 :preserve-dimensions t)
-  :result-arg 0)
+  :derive-type (sequence-result-nth-arg 0 :preserve-dimensions t))
 
 (defknown nreverse ((modifying sequence)) sequence (important-result)
   :derive-type (sequence-result-nth-arg 0 :preserve-dimensions t
@@ -666,10 +665,8 @@
   :result-arg 0)
 (defknown sb-impl::list-nreverse (list) list (important-result no-verify-arg-count)
   :result-arg 0)
-(defknown sb-impl::vector-reverse (vector) vector (no-verify-arg-count)
-  :result-arg 0)
-(defknown sb-impl::list-reverse (list) list (no-verify-arg-count)
-  :result-arg 0)
+(defknown sb-impl::vector-reverse (vector) vector (no-verify-arg-count))
+(defknown sb-impl::list-reverse (list) list (no-verify-arg-count))
 
 (defknown make-sequence (type-specifier index
                                         &key

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


hooks/post-receive
-- 
SBCL
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.