aboutsummaryrefslogtreecommitdiffhomepage
path: root/gtwiwtg.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'gtwiwtg.lisp')
-rw-r--r--gtwiwtg.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/gtwiwtg.lisp b/gtwiwtg.lisp
index 93a7922..dd46f2e 100644
--- a/gtwiwtg.lisp
+++ b/gtwiwtg.lisp
@@ -565,7 +565,7 @@ returns NIL."
(defun nfurcate! (count gen)
(make-dirty gen)
- (let ((qs (loop :for _ :below count-if :collect (make-queue))))
+ (let ((qs (loop :for _ :below count :collect (make-queue))))
(loop :for build-q :in qs
:collect
(let ((local-q build-q))