Function: rng-intern-choice1

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

Signature

(rng-intern-choice1 NORMALIZED NULLABLE)

Source Code

;; Defined in /usr/src/emacs/lisp/nxml/rng-match.el.gz
(defun rng-intern-choice1 (normalized nullable)
  (let ((key (cons 'choice
		   (mapcar #'rng--ipattern-index normalized))))
    (or (rng-get-ipattern key)
	(rng-put-ipattern key
			  'choice
			  nil
			  normalized
			  nullable))))