From 2e8323c2af42e817e98eb931eb733dc42c832448 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Juan=20Manuel=20Tom=C3=A1s?= <jtomas1815@gmail.com>
Date: Mon, 26 May 2025 19:14:28 -0300
Subject: Remove surround

---
 extra.lisp | 6 ------
 1 file changed, 6 deletions(-)

(limited to 'extra.lisp')

diff --git a/extra.lisp b/extra.lisp
index e99bf5b..b738da7 100644
--- a/extra.lisp
+++ b/extra.lisp
@@ -50,9 +50,3 @@
                (separated-list p separator)
                nothing)))
         (cons v vn)))
-
-(defun surround (p left &optional right)
-  (comp ((_ left)
-         (body p)
-         (_ (or right left)))
-        body))
-- 
cgit v1.2.3