Add some more unit tests to SRFI-144

Tests for flmin, flmax, fl-least, fl-epsilon, fl-greatest are included.
2025-05-18 21:29:19 +02:00 · 2022-05-15 08:30:27 -03:00 · 2022-05-15 08:30:27 -03:00 · 32ce583927
commit 32ce583927
parent 1ecf7f9c8a
1 changed files with 9 additions and 0 deletions
--- a/lib/srfi/144/test.sld
+++ b/lib/srfi/144/test.sld
@ -95,4 +95,13 @@
      (test -0.781212821 (flsecond-bessel 1 1.))
      (test 0.842700793 (flerf 1.))
      (test 0.157299207 (flerfc 1.))
+      (test #t (< 0.0
+                  fl-least
+                  fl-epsilon
+                  1.0
+                  (+ 1.0 fl-epsilon)
+                  fl-greatest
+                  +inf.0))
+      (test +inf.0 (flmin))
+      (test -inf.0 (flmax))
      (test-end))))