aboutsummaryrefslogtreecommitdiff
path: root/src/util.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/util.lisp')
-rw-r--r--src/util.lisp3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/util.lisp b/src/util.lisp
index c8fe7c8..ecf1d3b 100644
--- a/src/util.lisp
+++ b/src/util.lisp
@@ -56,8 +56,7 @@ expand into errors."
(defun ordinary-ll-without-&aux (ll)
(loop for arg in ll
- if (symbol-named &aux arg)
- return accum
+ if (eq '&aux arg) return accum
else collect arg into accum
finally (return accum)))