Function: cl-mapl

cl-mapl is an autoloaded and byte-compiled function defined in cl-extra.el.gz.

Signature

(cl-mapl FUNCTION LIST...)

Documentation

Like cl-maplist, but does not accumulate values returned by the function.

View in manual

Aliases

mapl (obsolete since 27.1)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/cl-extra.el.gz
;;;###autoload
(defun cl-mapl (func list &rest rest)
  "Like `cl-maplist', but does not accumulate values returned by the function.
\n(fn FUNCTION LIST...)"
  (if rest
      (let ((args (cons list (copy-sequence rest)))
            p)
        (while (not (memq nil args))
          (apply func args)
          (setq p args)
          (while p (setcar p (cdr (pop p))))))
    (let ((p list))
      (while p (funcall func p) (setq p (cdr p)))))
  list)