Function: cpp-progress-message

cpp-progress-message is a byte-compiled function defined in cpp.el.gz.

This function is obsolete since 29.1; use make-progress-reporter instead.

Signature

(cpp-progress-message &rest ARGS)

Documentation

Report progress by printing messages used by "cpp-" functions.

Print messages at most once every cpp-message-min-time-interval seconds. If that option is nil, don't prints messages. ARGS are the same as for message.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cpp.el.gz
(defun cpp-progress-message (&rest args)
  "Report progress by printing messages used by \"cpp-\" functions.

Print messages at most once every `cpp-message-min-time-interval' seconds.
If that option is nil, don't prints messages.
ARGS are the same as for `message'."
  (declare (obsolete make-progress-reporter "29.1"))
  (when cpp-message-min-time-interval
    (let ((time (current-time)))
      (unless (time-less-p cpp-message-min-time-interval
			   (time-subtract time cpp-progress-time))
        (setq cpp-progress-time time)
        (apply 'message args)))))