From 781c8cf9db654c82cabd385217eee2f659d5f7ad Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Mon, 23 Mar 2026 12:20:22 +0000 Subject: [PATCH] Fix a copy/paste error in decrement-resource-checkout-count! --- knots/resource-pool.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/knots/resource-pool.scm b/knots/resource-pool.scm index 5a8e2e0..8092a3a 100644 --- a/knots/resource-pool.scm +++ b/knots/resource-pool.scm @@ -138,7 +138,7 @@ (define-inlinable (decrement-resource-checkout-count! resource) (set-resource-details-checkout-count! resource - (1+ (resource-details-checkout-count resource)))) + (1- (resource-details-checkout-count resource)))) (define (spawn-fiber-for-checkout channel reply-channel