Function: rng-intern-after

rng-intern-after is a byte-compiled function defined in rng-match.el.gz.

Signature

(rng-intern-after CHILD AFTER)

Source Code

;; Defined in /usr/src/emacs/lisp/nxml/rng-match.el.gz
(defun rng-intern-after (child after)
  (if (eq child rng-not-allowed-ipattern)
      rng-not-allowed-ipattern
    (let ((key (list 'after
		     (rng--ipattern-index child)
		     (rng--ipattern-index after))))
      (or (rng-get-ipattern key)
	  (rng-put-ipattern key
			    'after
			    after
			    child
			    nil)))))