Function: cl-mapc

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

Signature

(cl-mapc FUNCTION SEQUENCE...)

Documentation

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

View in manual

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/cl-extra.el.gz
;;;###autoload
(defun cl-mapc (func seq &rest rest)
  "Like `cl-mapcar', but does not accumulate values returned by the function.
\n(fn FUNCTION SEQUENCE...)"
  (if rest
      (if (or (cdr rest) (nlistp seq) (nlistp (car rest)))
          (progn
            (cl--mapcar-many func (cons seq rest))
            seq)
        (let ((x seq) (y (car rest)))
          (while (and x y)
            (funcall func (pop x) (pop y)))
          seq))
    (mapc func seq)))