This commit is contained in:
Michiel Borkent 2025-04-26 10:36:01 +02:00
parent d92807493f
commit ef13f180ab

View file

@ -245,10 +245,8 @@
(deftest cached-thread-pool (deftest cached-thread-pool
(is (= 3 (bb nil "(import '(java.util.concurrent Executors ExecutorService)) (is (= 3 (bb nil "(import '(java.util.concurrent Executors ExecutorService))
(let [fut (.submit ^ExecutorService (Executors/newCachedThreadPool) (let [fut (.submit ^ExecutorService (Executors/newCachedThreadPool) ^Callable (fn [] 3))]
^Callable (fn [] 3))]
(.get fut))"))) (.get fut))")))
(is (nil? (bb nil "(import '(java.util.concurrent Executors ExecutorService)) (is (nil? (bb nil "(import '(java.util.concurrent Executors ExecutorService))
(let [fut (.submit ^ExecutorService (Executors/newCachedThreadPool) (let [fut (.submit ^ExecutorService (Executors/newCachedThreadPool) ^Runnable (fn [] 3))]
^Runnable (fn [] 3))]
(.get fut))")))) (.get fut))"))))