Removed inline declaration for macrolet… (thanks to irc://makomo@irc.freenode.org/#clschool).

Pascal J. Bourguignon [2018-12-15 13:24]
Removed inline declaration for macrolet… (thanks to  irc://makomo@irc.freenode.org/#clschool).
Filename
common-lisp/cesarum/utility.lisp
diff --git a/common-lisp/cesarum/utility.lisp b/common-lisp/cesarum/utility.lisp
index 5cf58d3..76ac56f 100644
--- a/common-lisp/cesarum/utility.lisp
+++ b/common-lisp/cesarum/utility.lisp
@@ -1453,7 +1453,6 @@ NOTE:    This version avoids calling FUN twice with the same argument.
            (follows '()))
        (macrolet ((enter     (item  list) `(pushnew ,item ,list :test test))
                   (enter-all (items list) `(setf ,list (delete-duplicates (append ,items ,list) :test test))))
-         (declare (inline enter enter-all))
          (setf current (coerce set 'list))
          (loop
            :do (loop ;; current -> fun -> follows
ViewGit