mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-23 13:01:42 -08:00
Code Issues Projects Releases Packages Wiki Activity

tests: add a regression test for (log small-ratio)

Browse source
This commit is contained in:
Daniel Kochmański 2022-11-10 21:12:27 +01:00
parent b45dec9c32
commit 06e553157c
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/tests/normal-tests/mixed.lsp
View file

@ -429,3 +429,8 @@
(let ((vector (si:make-vector t 10 t nil nil nil)))
(si:adjust-vector vector 20)
(is (= 20 (array-total-size vector)))))
;;; Created: 2022-11-10
;;; Contains: a test for a logarithm of a very small ratio
(test mix.0023.log-small-ratio
(finishes (log (/ 1 6319748715279270675921934218987893281199411530039296))))