Function: rng-transform-interleave-single

rng-transform-interleave-single is a byte-compiled function defined in rng-match.el.gz.

Signature

(rng-transform-interleave-single F SUBSTER IPATTERN)

Source Code

;; Defined in /usr/src/emacs/lisp/nxml/rng-match.el.gz
(defun rng-transform-interleave-single (f subster ipattern)
  (let ((children (rng--ipattern-child ipattern))
	found)
    (while (and children (not found))
      (let* ((child (car children))
	     (transformed (funcall f child)))
	(if (eq transformed rng-not-allowed-ipattern)
	    (setq children (cdr children))
	  (setq found
		(funcall subster
			 transformed
			 child
			 (rng--ipattern-child ipattern))))))
    (or found
	rng-not-allowed-ipattern)))