Fix resource-pool-destroy-resource-exception

Raising the exception is more consistent, and avoids returning the
resource.
This commit is contained in:
Christopher Baines 2025-06-26 21:27:32 +02:00
parent ab5411da42
commit 09ca6cfb6b

View file

@ -1351,8 +1351,7 @@ available. Return the resource once PROC has returned."
'destroy
'return)
resource))
(unless (resource-pool-destroy-resource-exception? exn)
(raise-exception exn)))
(raise-exception exn))
(lambda ()
(with-exception-handler
(lambda (exn)