X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fnumbers.lisp;h=ae3ebb9435334a7f4b6bba3edc9600f5ee2d6250;hb=50520b8f58d091bf2e033412b7e71b7846ea6aef;hp=811d4236d9a4a363bc6362614d1ea6e593e1994d;hpb=57b5128b148076b44a9f207b59b6b7702b5fcad9;p=jscl.git diff --git a/tests/numbers.lisp b/tests/numbers.lisp index 811d423..ae3ebb9 100644 --- a/tests/numbers.lisp +++ b/tests/numbers.lisp @@ -8,11 +8,13 @@ (test (= (max 1) 1)) (test (= (max 1 2 3) 3)) (test (= (max 3 2 1) 3)) +(test (= (max 1 2 3 4 5) 5)) ;;; MIN (test (= (min 1) 1)) (test (= (min 1 2 3) 1)) (test (= (min 3 2 1) 1)) +(test (= (min 9 3 8 7 6 3 3) 3)) ;;; EVENP (test (evenp 2))