aboutsummaryrefslogtreecommitdiffstats
path: root/src/wait-group.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/wait-group.lisp')
-rw-r--r--src/wait-group.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/wait-group.lisp b/src/wait-group.lisp
index b47f07b..b2bc22f 100644
--- a/src/wait-group.lisp
+++ b/src/wait-group.lisp
@@ -40,4 +40,4 @@
(defmethod wait ((wait-group wait-group))
"TODO"
- (loop until (= (counter wait-group) 0)))
+ (loop until (<= (counter wait-group) 0)))