[Git][cmucl/cmucl][master] 2 commits: Add test for overflow in expt that shouldn't happen

[Raymond Toy]

Raymond Toy pushed to branch master at cmucl / cmucl


Commits:
74b0de87 by Raymond Toy at 2021-02-03T17:04:16-08:00
Add test for overflow in expt that shouldn't happen

We shouldn't get an overflow, but we do because clang 10 miscompiles
e_pow.c and causes an overflow.

Addresses #101

- - - - -
23d1a1d1 by Raymond Toy at 2021-02-04T01:28:29+00:00
Merge branch 'issue-101-add-test' into 'master'

Add test for overflow in expt that shouldn't happen

See merge request cmucl/cmucl!68
- - - - -


1 changed file:

- tests/issues.lisp


Changes:

=====================================
tests/issues.lisp
=====================================
@@ -544,3 +544,15 @@
   ;; the correct value.
   (assert-false
    (funcall (compile nil '(lambda () (array-displacement "aaaaaaaa"))))))
+
+(define-test issue.101
+    (:tag :issues)
+  ;; Verifies that we don't get unexpected overflow.  The actual value
+  ;; is not really important.  The important part is no overflow is
+  ;; signaled.
+  ;;
+  ;; See https://gitlab.common-lisp.net/cmucl/cmucl/-/issues/101 for
+  ;; more details.
+  (assert-equalp
+   3.0380154777955097d205
+   (expt 1.7976931348623157d308 0.6666)))



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e349bf1da7a83e19650aff289320e03c5bb7a7ee...23d1a1d1c92aef17210b0b6c4ced5aa6e4eac285

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e349bf1da7a83e19650aff289320e03c5bb7a7ee...23d1a1d1c92aef17210b0b6c4ced5aa6e4eac285
You're receiving this email because of your account on gitlab.common-lisp.net.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20210204/0441c8ac/attachment.html>