From 0b4803a7efed94d314fd7d5e3ff4b63e4234531b Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Wed, 26 Jun 2019 18:03:09 -0400 Subject: [PATCH] Fix syntax error --- libs/cyclone/shared-queue.sld | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libs/cyclone/shared-queue.sld b/libs/cyclone/shared-queue.sld index 1b8f1136..e9868fe6 100644 --- a/libs/cyclone/shared-queue.sld +++ b/libs/cyclone/shared-queue.sld @@ -150,7 +150,7 @@ (define (%queue-size q) (let ((start (q:start q)) (end (q:end q)) - (capacity (vector-length (q:store)))) + (capacity (vector-length (q:store q)))) (cond ((< end start) (+ (- capacity start) end)) ((> end start) (- end start))