From 97f068617c396d049f43a1fadf22580dc8305f46 Mon Sep 17 00:00:00 2001
From: Colin Okay <cbeok@protonmail.com>
Date: Thu, 9 Jul 2020 07:56:42 -0500
Subject: license

---
 gtwiwtg.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'gtwiwtg.lisp')

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))
-- 
cgit v1.2.3