From bd32f9b39659c96672b14977997859ed1e68faab Mon Sep 17 00:00:00 2001 From: Shantanu Sardesai Date: Sat, 29 Aug 2026 16:09:19 +0530 Subject: [PATCH] Update `max` & `min` tests for `jank` --- test/clojure/core_test/max.cljc | 9 ++++++--- test/clojure/core_test/min.cljc | 6 ++++-- 2 files changed, 10 insertions(+), 5 deletions(-) diff --git a/test/clojure/core_test/max.cljc b/test/clojure/core_test/max.cljc index d4bbf63b..a0b832d5 100644 --- a/test/clojure/core_test/max.cljc +++ b/test/clojure/core_test/max.cljc @@ -31,9 +31,12 @@ (is (= ##Inf (max 1 2 3 4 5 ##Inf))) (is (NaN? (max ##NaN 1))) - (is (NaN? (max 1 ##NaN))) - (is (NaN? (max 1 2 3 4 ##NaN))) - (is (NaN? (max ##-Inf ##NaN ##Inf))) + #?@(:jank [(is 1 (= (max 1 ##NaN))) + (is 4 (= (max 1 2 3 4 ##NaN))) + (is ##Inf (= (max ##-Inf ##NaN ##Inf)))] + :default [(is (NaN? (max 1 ##NaN))) + (is (NaN? (max 1 2 3 4 ##NaN))) + (is (NaN? (max ##-Inf ##NaN ##Inf)))]) (is (NaN? (max ##NaN))) #?@(:lpy diff --git a/test/clojure/core_test/min.cljc b/test/clojure/core_test/min.cljc index fd83bc1b..ae5adf4a 100644 --- a/test/clojure/core_test/min.cljc +++ b/test/clojure/core_test/min.cljc @@ -30,10 +30,12 @@ (is (= ##-Inf (min 1 2 3 4 5 ##-Inf))) (is (= 1 (min 1 2 3 4 5 ##Inf))) + #?@(:jank [(is (= 1 (min 1 ##NaN))) + (is (= ##Inf (min ##-Inf ##NaN ##Inf)))] + :default [(is (NaN? (min 1 ##NaN))) + (is (NaN? (min ##-Inf ##NaN ##Inf)))]) (is (NaN? (min ##NaN 1))) - (is (NaN? (min 1 ##NaN))) (is (NaN? (min 1 2 3 4 ##NaN))) - (is (NaN? (min ##-Inf ##NaN ##Inf))) (is (NaN? (min ##NaN))) #?@(:lpy