[Emacs-diffs] Changes to emacs/lisp/progmodes/ebnf-bnf.el

[Werner LEMBERG]

Index: emacs/lisp/progmodes/ebnf-bnf.el
diff -c emacs/lisp/progmodes/ebnf-bnf.el:1.11 
emacs/lisp/progmodes/ebnf-bnf.el:1.12
*** emacs/lisp/progmodes/ebnf-bnf.el:1.11       Mon Apr  5 01:53:51 2004
--- emacs/lisp/progmodes/ebnf-bnf.el    Fri Mar 25 08:47:00 2005
***************
*** 1,6 ****
  ;;; ebnf-bnf.el --- parser for EBNF
  
! ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004
  ;; Free Sofware Foundation, Inc.
  
  ;; Author: Vinicius Jose Latorre <address@hidden>
--- 1,6 ----
  ;;; ebnf-bnf.el --- parser for EBNF
  
! ;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005
  ;; Free Sofware Foundation, Inc.
  
  ;; Author: Vinicius Jose Latorre <address@hidden>
***************
*** 461,467 ****
        'end-of-input)
         ;; error
         ((eq token 'error)
!       (error "Illegal character"))
         ;; default
         ((eq token 'default)
        (forward-char)
--- 461,467 ----
        'end-of-input)
         ;; error
         ((eq token 'error)
!       (error "Invalid character"))
         ;; default
         ((eq token 'default)
        (forward-char)
***************
*** 470,476 ****
            (prog1
                (ebnf-bnf-lex)
              (setq ebnf-default-p t))
!         (error "Illegal `default' element")))
         ;; integer
         ((eq token 'integer)
        (setq ebnf-bnf-lex (ebnf-buffer-substring "0-9"))
--- 470,476 ----
            (prog1
                (ebnf-bnf-lex)
              (setq ebnf-default-p t))
!         (error "Invalid `default' element")))
         ;; integer
         ((eq token 'integer)
        (setq ebnf-bnf-lex (ebnf-buffer-substring "0-9"))
***************
*** 550,556 ****
         (forward-char)
         t)
        (t
!        (error "Illegal character"))
        ))
  
  
--- 550,556 ----
         (forward-char)
         t)
        (t
!        (error "Invalid character"))
        ))