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