master: Add a missing opaque-identity

snuglas via Sbcl-commits <[email protected]> Fri, 05 Jun 2026 17:07:00 +0000
Newsgroups gmane.lisp.steel-bank.cvs
Message-ID <[email protected]>
The branch "master" has been updated in SBCL:
       via  3efad92f20327eae7c3398043dc883803aa3fb9d (commit)
      from  f3d711cd2af700a1ed9b22570987e7ccf94885bc (commit)

- Log -----------------------------------------------------------------
commit 3efad92f20327eae7c3398043dc883803aa3fb9d
Author: Douglas Katzman <[email protected]>
Date:   Fri Jun 5 13:06:43 2026 -0400

    Add a missing opaque-identity
---
 tests/callback.impure.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/callback.impure.lisp b/tests/callback.impure.lisp
index 3289e1947..83b3ce476 100644
--- a/tests/callback.impure.lisp
+++ b/tests/callback.impure.lisp
@@ -511,4 +511,4 @@
       (setf (sb-sys:sap-ref-word (car restorer) 0) (cdr restorer)))
     (assert (eql *got-arg* 0d0))
     (assert (= result 42.0d0))
-    (assert (eql (tan 0d0) 0d0))))) ; back to normal
+    (assert (eql (tan (opaque-identity 0d0)) 0d0))))) ; back to normal

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


hooks/post-receive
-- 
SBCL