master: Remove defknowns for removed functions
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 c104c75a3ced9efb23860f3f60a3ec44e9fba6e4 (commit)
from 6a371bf547f722e75c2f5e88ddcdf84d5c9858d9 (commit)
- Log -----------------------------------------------------------------
commit c104c75a3ced9efb23860f3f60a3ec44e9fba6e4
Author: Stas Boukarev <[email protected]>
Date: Mon Aug 24 02:31:02 2026 +0300
Remove defknowns for removed functions
---
src/cold/exports.lisp | 5 ++---
src/compiler/generic/vm-fndb.lisp | 14 +++-----------
2 files changed, 5 insertions(+), 14 deletions(-)
diff --git a/src/cold/exports.lisp b/src/cold/exports.lisp
index 0c2af38ba..782e6c3ac 100644
--- a/src/cold/exports.lisp
+++ b/src/cold/exports.lisp
@@ -1580,8 +1580,8 @@ is a good idea, but see SB-SYS re. blurring of boundaries.")
"%HYPOT" "%HYPOTF"
"%INSTANCE-CAS"
"%LDB"
- "%LOG" "%LOGB" "%LOG10"
- "%LOGF" "%LOGBF" "%LOG10F"
+ "%LOG" "%LOG10"
+ "%LOGF" "%LOG10F"
"%LAST0"
"%LAST1"
"%LASTN/FIXNUM"
@@ -1642,7 +1642,6 @@ is a good idea, but see SB-SYS re. blurring of boundaries.")
"%RASSOC-TEST"
"%RASSOC-TEST-NOT"
"%VECTOR-RAW-BITS"
- "%SCALB" "%SCALBN"
"%RAW-INSTANCE-ATOMIC-INCF/WORD"
"%RAW-INSTANCE-CAS/WORD" "%RAW-INSTANCE-XCHG/WORD"
"%RAW-INSTANCE-REF/WORD" "%RAW-INSTANCE-SET/WORD"
diff --git a/src/compiler/generic/vm-fndb.lisp b/src/compiler/generic/vm-fndb.lisp
index 75529742c..320fcebbd 100644
--- a/src/compiler/generic/vm-fndb.lisp
+++ b/src/compiler/generic/vm-fndb.lisp
@@ -61,7 +61,7 @@
signed-byte-32-p
#+64-bit unsigned-byte-64-p
#+64-bit signed-byte-64-p
- weak-pointer-p code-component-p lra-p
+ weak-pointer-p code-component-p
sb-int:unbound-marker-p
pointerp
simple-fun-p
@@ -918,7 +918,7 @@
(defknown double-float-low-bits (double-float) (unsigned-byte 32)
(movable foldable flushable))
-(defknown (%tan %sinh %asinh %atanh %log %logb %log10 %log1p %log2 %tan-quick)
+(defknown (%tan %sinh %asinh %atanh %log %log10 %log1p %log2 %tan-quick)
(double-float) double-float
(movable foldable flushable))
@@ -926,7 +926,7 @@
(single-float) single-float
(movable foldable flushable))
-(defknown (%sin %cos %tanh %sin-quick %cos-quick)
+(defknown (%sin %cos %tanh)
(double-float) (double-float -1.0d0 1.0d0)
(movable foldable flushable))
@@ -1002,14 +1002,6 @@
#.(coerce pi 'single-float))
(movable foldable flushable))
-(defknown (%scalb)
- (double-float double-float) double-float
- (movable foldable flushable))
-
-(defknown (%scalbn)
- (double-float (signed-byte 32)) double-float
- (movable foldable flushable))
-
(defknown (%unary-truncate %unary-round) (real) integer
(movable foldable flushable no-verify-arg-count))
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL