109 |
;; ;; 8-bit accentuated characters) except `"', as `"' is used to delimit a |
;; ;; 8-bit accentuated characters) except `"', as `"' is used to delimit a |
110 |
;; ;; terminal. Also, accepts escaped characters, that is, a character |
;; ;; terminal. Also, accepts escaped characters, that is, a character |
111 |
;; ;; pair starting with `\' followed by a printable character, for |
;; ;; pair starting with `\' followed by a printable character, for |
112 |
;; ;; example: \", \\. |
;; ;; example: \", \\. |
113 |
;; |
;; |
114 |
;; special = "[^?\\000-\\010\\012-\\037\\177-\\237]*". |
;; special = "[^?\\000-\\010\\012-\\037\\177-\\237]*". |
115 |
;; ;; that is, a valid special accepts any printable character (including |
;; ;; that is, a valid special accepts any printable character (including |
429 |
|
|
430 |
|
|
431 |
(defun ebnf-bnf-lex () |
(defun ebnf-bnf-lex () |
432 |
"Lexical analyser for EBNF. |
"Lexical analyzer for EBNF. |
433 |
|
|
434 |
Return a lexical token. |
Return a lexical token. |
435 |
|
|