From e7cb0b8256eefa8dfa07cfee2f4335bf6a414c72 Mon Sep 17 00:00:00 2001
From: Teddy Wing
Date: Sat, 27 Feb 2021 17:03:21 +0100
Subject: macro: Add documentation

---
 l/src/macro.lisp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/l/src/macro.lisp b/l/src/macro.lisp
index 283cf9f..18c7d21 100644
--- a/l/src/macro.lisp
+++ b/l/src/macro.lisp
@@ -1,9 +1,13 @@
 (in-package :extreload)
 
 (defmacro filter (predicate list-form)
+  "Returns a sequence that only includes elements of `list-form` that satisfy
+the test of `predicate`."
   `(remove-if-not ,predicate ,list-form))
 
 (defmacro with-websocket-connection ((client) &body body)
+  "Open a WebSocket connection on `client` and run `body` forms. The connection
+is automatically closed at the end of execution."
   `(progn
      (wsd:start-connection ,client)
      (unwind-protect (progn ,@body)
-- 
cgit v1.2.3