Fix record-predicate that should be exception-predicate
This commit is contained in:
parent
8f3e0a9a1d
commit
163d775496
4 changed files with 10 additions and 10 deletions
|
@ -198,7 +198,7 @@ from there, or #f if that would be an empty string."
|
|||
(record-accessor &thread-pool-timeout-error 'pool)))
|
||||
|
||||
(define thread-pool-timeout-error?
|
||||
(record-predicate &thread-pool-timeout-error))
|
||||
(exception-predicate &thread-pool-timeout-error))
|
||||
|
||||
(define* (make-fixed-size-thread-pool size
|
||||
#:key
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue