diff options
| author | Vinicius Jose Latorre <viniciusjl@ig.com.br> | 2004-02-25 00:07:33 +0000 |
|---|---|---|
| committer | Vinicius Jose Latorre <viniciusjl@ig.com.br> | 2004-02-25 00:07:33 +0000 |
| commit | ac4780a12cd50a1e185a88a19236c705554d463b (patch) | |
| tree | 610959432195e5af36c8fe48f718b9e394eacdc3 /lisp/progmodes/ebnf-bnf.el | |
| parent | da8f925e2d8a2a77f72ab1e34518d0756f575996 (diff) | |
| download | emacs-ac4780a12cd50a1e185a88a19236c705554d463b.tar.gz emacs-ac4780a12cd50a1e185a88a19236c705554d463b.tar.bz2 emacs-ac4780a12cd50a1e185a88a19236c705554d463b.zip | |
ABNF parser. Fix bug on productions like test = {"test"}* | ("tt" ["test"]). Reported by Markus Dreyer.
Diffstat (limited to 'lisp/progmodes/ebnf-bnf.el')
| -rw-r--r-- | lisp/progmodes/ebnf-bnf.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/lisp/progmodes/ebnf-bnf.el b/lisp/progmodes/ebnf-bnf.el index f9d1c718d4f..41bd0cd0d49 100644 --- a/lisp/progmodes/ebnf-bnf.el +++ b/lisp/progmodes/ebnf-bnf.el @@ -1,12 +1,13 @@ ;;; ebnf-bnf.el --- parser for EBNF -;; Copyright (C) 1999, 2000, 2001 Free Sofware Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004 +;; Free Sofware Foundation, Inc. -;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br> -;; Maintainer: Vinicius Jose Latorre <vinicius@cpqd.com.br> +;; Author: Vinicius Jose Latorre <viniciusjl@ig.com.br> +;; Maintainer: Vinicius Jose Latorre <viniciusjl@ig.com.br> +;; Time-stamp: <2004/02/22 14:25:06 vinicius> ;; Keywords: wp, ebnf, PostScript -;; Time-stamp: <2003-02-10 10:29:48 jbarranquero> -;; Version: 1.7 +;; Version: 1.8 ;; This file is part of GNU Emacs. @@ -462,9 +463,9 @@ See documentation for variable `ebnf-bnf-lex'." 'integer) ;; special: ?special? ((eq token 'special) - (setq ebnf-bnf-lex (concat "?" + (setq ebnf-bnf-lex (concat (and ebnf-special-show-delimiter "?") (ebnf-string " ->@-~" ?\? "special") - "?")) + (and ebnf-special-show-delimiter "?"))) 'special) ;; terminal: "string" ((eq token 'terminal) |