From 46de4b9049b26ecb0ca98a9de2e560ed609fe1f6 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Mon, 1 Jul 2019 18:31:06 -0400 Subject: [PATCH] Cleanup --- libs/cyclone/concurrent.sld | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/libs/cyclone/concurrent.sld b/libs/cyclone/concurrent.sld index 86a822d6..76e60a49 100644 --- a/libs/cyclone/concurrent.sld +++ b/libs/cyclone/concurrent.sld @@ -391,10 +391,7 @@ (threads tp:threads tp:set-threads!) ) -(define (thread-pool-default-handler err) -;; TODO: why is this never being called?? -(write "called default error handler") (newline) -#f) +(define (thread-pool-default-handler err) #f) (define (%make-thread-pool-thread q handler) (make-thread