common-lisp/sbcl.sbcl
1
0
Fork 0
mirror of git://git.code.sf.net/p/sbcl/sbcl synced 2026-09-10 07:26:40 -04:00
Code Issues Actions 8 Packages Projects Releases Wiki Activity

Fix a test for x87

Browse source
This commit is contained in:
Stas Boukarev 2025-04-02 04:27:39 +03:00
parent f27d4d52b5
commit b327ce15a3
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
tests/float.pure.lisp
View file

@ -879,4 +879,4 @@
(multiple-value-bind (q r) (truncate (opaque-identity 1f30)
(opaque-identity 49.12944))
(assert (= q 20354393599312814931347243008))
(assert (= r 7.5557864e22))))
(assert (= r #-x86 7.5557864e22 #+x86 4.971228e22))))