Function: rng-do-some-validation

rng-do-some-validation is a byte-compiled function defined in rng-valid.el.gz.

Signature

(rng-do-some-validation &optional CONTINUE-P-FUNCTION)

Documentation

Do some validation work. Return t if more to do, nil otherwise.

Source Code

;; Defined in /usr/src/emacs/lisp/nxml/rng-valid.el.gz
(defun rng-do-some-validation (&optional continue-p-function)
  "Do some validation work.  Return t if more to do, nil otherwise."
  (save-excursion
    (save-restriction
      (widen)
      (condition-case-unless-debug err
	  (and (rng-validate-prepare)
	       (let ((rng-dt-namespace-context-getter '(nxml-ns-get-context)))
		 (rng-do-some-validation-1 continue-p-function)))
	;; errors signaled from a function run by an idle timer
	;; are ignored; if we don't catch them, validation
	;; will get mysteriously stuck at a single place
	(rng-compile-error
	 (message "Incorrect schema. %s" (nth 1 err))
	 (rng-validate-mode 0)
	 nil)
	(error
	 (message "Internal error in rng-validate-mode triggered at buffer position %d. %s"
		  (point)
		  (error-message-string err))
	 (rng-validate-mode 0)
	 nil)))))