mirror of
git://git.code.sf.net/p/sbcl/sbcl
synced 2026-09-10 07:26:40 -04:00
Add a missing opaque-identity
This commit is contained in:
parent
f3d711cd2a
commit
3efad92f20
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Reference in a new issue