From dc2fc9f2cd69422c720daaa531d1bdb9a6bde0e5 Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sun, 31 Jan 2021 19:50:38 +0100
Subject: Define a library for Go-style wait groups

Define a data structure and methods to represent a Go-style wait group,
similar to `sync.WaitGroup` (except single-threaded).

Implements a similar interface. Calling `wait` blocks until the wait
group's internal counter gets to 0.
---
 src/package.lisp | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 src/package.lisp

(limited to 'src/package.lisp')

diff --git a/src/package.lisp b/src/package.lisp
new file mode 100644
index 0000000..c868d02
--- /dev/null
+++ b/src/package.lisp
@@ -0,0 +1,9 @@
+(defpackage :wait-group
+  (:nicknames :wg)
+
+  (:use :cl)
+
+  (:export #:make-wait-group
+           #:add
+           #:done
+           #:wait))
-- 
cgit v1.2.3