Mercurial > emacs
changeset 49669:158253007cd0
(ebnf-optimize, ebnf-optimize1): Fix typo.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Mon, 10 Feb 2003 09:55:17 +0000 |
| parents | f118fc83f5a5 |
| children | cc820064216c |
| files | lisp/progmodes/ebnf-otz.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/ebnf-otz.el Mon Feb 10 08:24:29 2003 +0000 +++ b/lisp/progmodes/ebnf-otz.el Mon Feb 10 09:55:17 2003 +0000 @@ -1,11 +1,11 @@ -;;; ebnf-otz.el --- syntatic chart OpTimiZer +;;; ebnf-otz.el --- syntactic chart OpTimiZer ;; Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc. ;; Author: Vinicius Jose Latorre <vinicius@cpqd.com.br> ;; Maintainer: Vinicius Jose Latorre <vinicius@cpqd.com.br> ;; Keywords: wp, ebnf, PostScript -;; Time-stamp: <2001/08/15 17:13:25 vinicius> +;; Time-stamp: <2003-02-10 10:46:51 jbarranquero> ;; Version: 1.0 ;; This file is part of GNU Emacs. @@ -196,7 +196,7 @@ ;; A = B | C A D. ==> A = B | C A D. (defun ebnf-optimize (syntax-list) - "Syntatic chart optimizer." + "Syntactic chart optimizer." (if (not ebnf-optimize) syntax-list (let ((ebnf-total (length syntax-list)) @@ -225,7 +225,7 @@ ;; 10. A = B C E | B D E. ==> A = B (C | D) E. (defun ebnf-optimize1 (prod) - (ebnf-message-info "Optimizing syntatic chart") + (ebnf-message-info "Optimizing syntactic chart") (let ((production (ebnf-node-production prod))) (and (eq (ebnf-node-kind production) 'ebnf-generate-alternative) (let* ((hlist (ebnf-split-header-prefix