diff options
-rw-r--r-- | extra.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -51,8 +51,8 @@ nothing))) (cons v vn))) -(defun surrounded (p left right) +(defun surrounded (p left &optional right) (comp ((_ left) (body p) - (_ right)) + (_ (or right left))) body)) |