Function: range-map

range-map is a byte-compiled function defined in range.el.gz.

Signature

(range-map FUNC RANGE)

Documentation

Apply FUNC to each value contained by RANGE.

Aliases

gnus-range-map (obsolete since 29.1)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/range.el.gz
(defun range-map (func range)
  "Apply FUNC to each value contained by RANGE."
  (setq range (range-normalize range))
  (while range
    (let ((span (pop range)))
      (if (numberp span)
          (funcall func span)
        (let ((first (car span))
              (last (cdr span)))
          (while (<= first last)
            (funcall func first)
            (setq first (1+ first))))))))