Function: ebnf-dtd-attribute-optional

ebnf-dtd-attribute-optional is a byte-compiled function defined in ebnf-dtd.el.gz.

Signature

(ebnf-dtd-attribute-optional TOKEN ATTR MATCH ATTR-NAME)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/ebnf-dtd.el.gz
(defun ebnf-dtd-attribute-optional (token attr match attr-name)
  (when (eq token attr)
    (or (and (eq (ebnf-dtd-lex) 'equal)
	     (eq (ebnf-dtd-lex) 'string)
	     (string-match match ebnf-dtd-lex))
	(error "XML %s attribute is invalid" attr-name))
    (setq token (ebnf-dtd-lex)))
  token)