Fix fixed size thread pool lifetimes

2025-11-19 13:18:39 +00:00 · 2025-11-19 13:18:39 +00:00 · 95200eccfd
commit 95200eccfd
parent 05ad83c703
2 changed files with 38 additions and 3 deletions
--- a/knots/thread-pool.scm
+++ b/knots/thread-pool.scm
@ -343,7 +343,7 @@ from there, or #f if that would be an empty string."
                      expire-on-exception?)
                 #t
                 (if lifetime
-                     (if (<= 1 lifetime)
+                     (if (<= lifetime 1)
                         #t
                         (loop (- lifetime 1)))
                     (loop lifetime)))))))))