tests: add regression test for #299

This commit is contained in:
Daniel Kochmański 2016-11-04 20:19:56 +01:00
parent 02efac0ce5
commit fee98d837c

View file

@ -46,3 +46,8 @@
(is (ext:float-infinity-p ext:single-float-negative-infinity))
(is (ext:float-infinity-p ext:single-float-positive-infinity))
(is (ext:float-nan-p (si:nan))))
;;; Reported by: Robert Dodier
;;; URL: https://gitlab.com/embeddable-common-lisp/ecl/issues/299
(test ieee-fp.0003.b299
(finishes (< ext:double-float-negative-infinity 1/3)))