comparison lisp/progmodes/ebnf-abn.el @ 60917:87f9bb9d3718

* progmodes/ebnf-abn.el, progmodes/ebnf-bnf.el, progmodes/ebnf-ebx.el, progmodes/ebnf-dtd.el, progmodes/ebnf-iso.el, progmodes/ebnf-yac.el, progmodes/ebnf2ps.el, progmodes/idlwave.el, progmodes/sh-script.el, progmodes/xscheme.el: Replace `illegal' with `invalid'.

60916:480134f8cd16

;;; ebnf-abn.el --- parser for ABNF (Augmented BNF)

;; Copyright (C) 2004 Free Sofware Foundation, Inc.

;; Author: Vinicius Jose Latorre <[e-mail]>
;; Maintainer: Vinicius Jose Latorre <[e-mail]>
;; Time-stamp: <2004/04/03 16:43:57 vinicius>
;; Keywords: wp, ebnf, PostScript

       ;; end of input
       ((>= (point) ebnf-limit)
	'end-of-input)
       ;; error
       ((eq token 'error)
	(error "Illegal character"))
       ;; end of rule
       ((eq token 'end-of-rule)
	'end-of-rule)
       ;; integer
       ((eq token 'integer)

  (cond ((>= (point) ebnf-limit)
	 nil)
	((= (following-char) ?\n)
	 t)
	(t
	 (error "Illegal character"))
	))


(defun ebnf-abn-eps-filename ()
  (forward-char)

60917:87f9bb9d3718

;;; ebnf-abn.el --- parser for ABNF (Augmented BNF)

;; Copyright (C) 2004, 2005 Free Sofware Foundation, Inc.

;; Author: Vinicius Jose Latorre <[e-mail]>
;; Maintainer: Vinicius Jose Latorre <[e-mail]>
;; Time-stamp: <2004/04/03 16:43:57 vinicius>
;; Keywords: wp, ebnf, PostScript

       ;; end of input
       ((>= (point) ebnf-limit)
	'end-of-input)
       ;; error
       ((eq token 'error)
	(error "Invalid character"))
       ;; end of rule
       ((eq token 'end-of-rule)
	'end-of-rule)
       ;; integer
       ((eq token 'integer)

  (cond ((>= (point) ebnf-limit)
	 nil)
	((= (following-char) ?\n)
	 t)
	(t
	 (error "Invalid character"))
	))


(defun ebnf-abn-eps-filename ()
  (forward-char)